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I.  INTRODUCTION 

Since  World  War  II,  chaff,  which  is  a code  name  for  a col- 
lection of  thousands  of  linear  resonant  dipoles,  has  been  used  as 
an  effective  passive  ECM  against  pertinent  threat  radar  systems. 

One  generally  recognizes  at  least  two  significant  roles  for  chaff; 
first,  self-protection  as  in  the  case  of  aircraft  against  fire  con- 
trol radars,  and  second,  in  situations  where  initially  sown  dipole 
corridors  saturate  radar  receivers  and  the  corridors  are  subse- 
quently utilized  as  penetration  aids.  Heretofore,  the  echoing 
area  or  the  radar  cross  section  of  a chaff  cloud  has  been  calcu- 
lated by  multiplying  the  number  of  dipoles  by  the  so-called  "tumble 
average  radar  cross-section"  of  a single  dipole.  Estimates  based 
on  this  simple  model  have  been  poor.  Experimental  measurements 
are  between  2-50%  of  the  theoretical  value,  depending  upon  the 
situation.  Furthermore,  once  certain  dipole  densities  have  been 
reached  doubling  or  even  quadrupling  the  number  of  dipoles  show 
very  little  increase  in  echo  area.  The  significance  of  these  dis- 
crepancies is  that  the  simple  tumble  average  model  is  not  satis- 
factory and  it  is  high  time  one  undertakes  a more  realistic  study 
of  the  electromaonet ic  scatterina  and  attenuation  properties  of 
chaff  clouds.  To  fulfill  the  requirements,  the  ElectroScience 
Laboratory  under  sponsorship  of  the  Air  Force  Avionics  Laboratory 
has  undertaken  a comprehensive  study  of  the  electromagnetic  behavior 
of  chaff  clouds.  The  effort  has  been  conveniently  divided  into  three 
phases  of  increasing  complexity.  These  are 

1.  Scattering  behavior  of  single  length,  i.e.,  one 
frequency,  dipoles  with  moderate  mutual  coupling 
between  the  elements. 

2.  Same  as  above  but  wit*-;  close  coupling,  even  touching, 

3.  Clouds  of  different  dipole  lengths,  i.e.,  multiple 
frequency  clouds 

The  work  performed  under  this  contract  emphasized  (1),  with  some 
effort  devoted  to  (2)  and  (3). 

The  scattering  and  extinction  behavior  of  large  ensembles  of 
particles  has  long  been  a subject  of  study  in  such  diverse  dis- 
ciplines as  acoustics,  quantum  mechanics  and  electromagnetics  [1], 
Most  work  is  based  upon  certain  assumptions  which  make  the  problem 
analytically  tractable,  such  as  very  small  particle  size,  large 
spacing,  no  coupling  or  forward-neighbor  coupling  only,  etc.  In 
their  domains  of  validity,  mathematical  models  based  on  such 
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assumptions  have  indeed  been  useful  in  treating  particulate  media. 

In  the  case  of  a chaff  cloud,  however,  two  features  complicate  the 
problem:  the  particles  are  linear  dipoles  of  lengths  x/2  (resonant) 

or  greater  and  therefore  cannot  be  considered  small;  and  during  the 
early  history  of  the  cloud,  before  it  fully  blooms,  these  dipoles 
are  closely  spaced  and  strongly  coupled  electromagnetically. 
Furthermore,  blooming  implies  non-stationary  cloud  statistics,  and 
packaging  configuration,  dispensing  technique  and  atmospheric  con- 
ditions all  influence  the  electromagnetic  behavior  of  the  cloud  in 
time.  These  and  many  other  problems  face  the  investigator  who 
wishes  to  answer  such  questions  as,  "How  many  dipoles  is  optimum 
for  a cloud  in  a given  tactical  situation."  "Is  there  a par- 
ticular shape  or  density  or  density  distribution  of  a cloud  that 
is  preferred?"  "What  are  the  expected  scintillation  rates?"  "Can 
one  make  a cloud  bloom  faster  electromagnetically?"  These 
questions  cannot  be  answered  until  we  understand  how  a radium 
composed  of  many  strongly  resonant  scatterers,  which  may  be 
closely  coupled,  interacts  with  a radar  wave,  that  is,  until  we 
can  answer  the  basic  question,  "How  does  a chaff  cloud  scatter?" 

Many  attempts  have  been  made  in  the  past  to  answer  the  above 
question,  usually  to  obtain  the  spatial  average  backscatter  at 
resonance  for  a cloud  of  dipoles  "frozen"  in  time  [2,3].  Ex- 
tensions were  made  to  include  nonresonant  dipoles  and  dipoles 
with  preferred  orientations  [4]  as  well  as  the  dynamics  of  the 
dipoles  [5, 6, 7, 8].  In  all  instances,  however,  the  effects  of 
coupling  among  elements  were  not  included  in  the  analysis  due  to 
ensuing  computational  difficulties.  Only  recently  has  it  become 
possible  to  account  for  coupling,  at  least  on  a limited  basis,  by 
use  of  large  digital  computer  techniques  [9,10,11],  Although  we 
shall  never  be  able  (or  ever  wish)  to  account  for  all  inter- 
actions among  the  millions  of  dipoles  in  a typical  chaff  cloud, 
the  present  capability  of  handling  250  resonant  dipoles  gives 
hope  of  accounting  for  sufficient  numbers  of  interactions  to  ob- 
tain an  accurate  statistical  description  of  the  behavior  of  any 
cloud. 

The  purpose  of  our  work  was  to  bring  the  computer  to  bear  on 
the  chaff  cloud  problem  in  order  to  investigate  the  limits  of 
simplifying  approximations,  to  support,  refine,  or  replace  simple 
models,  to  obtain  and  interpret  statistical  data,  and,  basically, 
to  better  understand  the  scattering  mechanism.  This  final  report 
describes  results  developed  over  the  three  year  time  span  of  the 
contract.  Because  the  effort  extended  over  such  a long  period, 
many  of  the  earlier  methods  for  generating  scattering  data  were 
superceded  by  improved  methods,  but  the  results  still  remain  valid 
and  valuable  for  the  inferences  that  can  be  made  from  them.  Thus, 
many  of  these  early  results,  reported  in  Reference  12,  are  pre- 
sented here  as  well  to  provide  a complete  and  integrated  overview 
of  the  effort. 


The  main  chapter  of  this  report,  entitled,  Technical  Discussion 
and  Results,  is  divided  into  several  sections.  In  Section  A we 
discuss  the  concept  of  a frozen  cloud  as  a useful  chaff  model  in 
the  absence  of  realistic  lime  varying  data;  in  Section  B (and 
Appendix  A)  are  discussed  the  statistical  quantities  we  have  used 
to  describe  the  radar  cross  section  of  a chaff  cloud.  Section  C is 
a lengthy  one  which  itself  is  divided  into  several  parts;  Introductc 
Remarks,  which  is  intended  to  provide  a very  brief  and  general  dis- 
cussion of  the  method  of  moments  (more  details  appear  in  Appendix  B) 
by  which  the  integral  equation  describing  the  electromagnetic  chaff 
interaction  problem  is  reduced  to  a set  of  simultaneous  algebraic 
(matrix)  equations  suitable  for  processing  by  digital  computer; 
Direct  Methods,  which  describes  the  most  commonly  applied  techniques 
for  solving  the  above-mentioned  matrix  equations,  such  as  the  method 
of  Crout;  Sparse  Matrix  Methods,  which  describes  special  algorithms 
which  are  useful  if  the  matrix  is  large  and  is  sparse,  i.e.,  has 
many  2eros  in  it;  i.e.,  weak  coupling  between  chaff  elements,  and 
Indirect,  or  Iterative.  Methods,  which  appear  to  be  useful  for  large 
matrices,  i.e.,  large  numbers  of  chaff  elements,  without  the  as- 
sumpticn  of  sparsity.  Typical  results,  as  derived  by  each  method, 
are  presented  in  appropriate  sections,  together  with  a discussion 
and  conclusions  inferred  from  those  results.  In  some  instances 
verifying  experimental  data  are  also  given  to  support  the  com- 
putations. Computer  programs  used  to  generate  the  results,  either 
by  the  direct,  sparse  or  iterative  methods,  are  documented  in  Ap- 
pendices D,  E and  F,  respectively. 

The  primary  emphasis  during  the  contract  was  the  investigation 
of  clouds  of  resonant  (half-wave)  dipoles  which  were  nut  "too 
closely"  spaced.  Some  effort  was  expended  to  better  define  what 
"too  closely"  means  in  terms  of  the  computer  models  used  in  our 
work,  and  this  is  discussed  in  Section  D of  Chapter  II,  Section 
E is  addressed  to  chaff  clouds  containing  multi -length  elements 
for  purposes  of  broadbanding  the  chaff  echo  to  meet  threats  over 
a range  of  frequencies.  Section  F is  devoted  to  experimental 
results.  Although  the  bulk  effort  was  primarily  computational , 
some  experimental  data  were  recorded  to  verify  the  computed 
results  and  to  observe  certain  scattering  and  extinction  behaviors 
of  moving  dipoles  in  numbers  much  greater  than  can  be  handled  by 
computer  (^8000).  These  and  other  experimental  efforts  are  reported 
in  this  section. 


Section  G of  Chapter  II  is  on  a topic  somewhat  divorced  from 
that  of  chaff  cloud  scattering  characteristics.  In  it  we  present 
an  initial  effort  to  investigate  the  aircraft-chaff  cloud-tracking 
missile  intercept  problem.  Many  of  the  parameters  of  this  problem 
are  unknown,  such  as  location  and  motion  of  scattering  centers 
from  a particular  aircraft  as  a function  of  its  maneuvers,  the 
precise  aerodynamic  and  electromagnetic  behavior  of  chaff  clouds 
spawned  by  the  aircraft,  and  the  range  and  tracking  behavior  of 
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the  missile  radars  under  such  complex  returns.  Although  these 
quantities  were  assumed  in  this  study,  it  is  anticipated  that  the 
approaches  suggested  here  will  become  very  useful  for  computerized 
simulation  studies  when  more  accurate  input  data  become  available 
through  diverse  research  programs.  More  detail  is  given  in  Appendix  G. 

Chapter  III  concludes  the  body  of  the  report  with  an  overall 
discussion  of  our  findings  and  suggestions  for  future  effort. 

Six  appendixes  were  already  alluded  to.  One  additional  appendix  (C) 
describes  the  Gauss ianly  distributed  density  of  dipoles  employed 
throughout  most  of  the  contract.  In  the  late  stages  of  our  work 
uniformly  dense  clouds  were  preferred  and  their  generation  is 
briefly  described  as  well. 
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II.  TECHNICAL  DISCUSSION  AND  RESULTS 


A.  The  Frozen  Chaff  Cloud  Model 

It  is  appropriate  to  discuss  the  first  fundamental  assumption 
upon  which  all  our  work,  be  it  by  computer  or  by  laboratory  experi- 
ment, rests.  This  is  the  assumption  of  the  "frozen"  chaff  cloud 
model . 


Scattering  by  a real  chaff  cloud  is  a stochastic  process  in 
the  independent  variable,  time.  At  any  given  instant  not  only 
do  we  find  the  dipoles  randomly  positioned  and  oriented,  but  over 
a short  interval  of  time  they  move  and  give  rise  to  random  fluc- 
tuations in  the  cross  section  (be  it  monostatic,  bistatic,  or 
foreward).  Moreover,  with  the  passage  of  time,  the  cloud  evolves 
from  a dense  to  a tenuous  conglomerate  of  dipoles  so  that,  viewed 
over  a long  interval,  the  stochastic  scattering  process  appears 
nonstationary,  i.e.,  its  statistics  change  with  time. 

In  order  to  approximate  the  lower  order  statistics  associated 
with  a certain  instant  of  time,  one  might  consider  an  ensemble  of 
similarly  evolving  clouds  and  take  averages  over  this  ensemble  at 
the  time  of  interest.  This  viewpoint  leads  us  to  the  so  called 
ensemble  model,  in  which  time  is  stopped  at  regular  intervals,  a 
"snapshot"  taken  of  each  cloud  in  the  ensemble  of  clouds,  and  the 
ensemble  average  of  backscatter  calculated  for  each  time  sample. 

As  time  progresses  and  the  cloud  blooms,  we  assume  the  ensemble 
averages  from  each  successive  set  of  "snapshots"  change  and 
faithfully  characterize  the  time  average's  behavior  of  a random 
cloud  in  evolution. 

The  generation  of  a large  ensemble  of  clouds  and  the  com- 
putation of  ensemble  average  backscatter,  for  example,  as  the 
clouds  evolve  in  time  is  an  expensive  process,  especially  if  the 
clouds  contain  many  dipoles.  Thus  there  arises  the  proposition, 
instead  of  generating  many  different  clouds  (requiring  the  cal- 
culation of  mutual  impedances  among  dipoles  for  each  new  cloud) 
to  form  an  ensemble  over  which  to  average,  can  we  more  efficiently 
obtain  an  equivalent  ensemble  average  by  viewing  the  same  cloud 
(requiring  the  calculation  of  mutual  impedances  among  dipoles 
only  once)  at  many  different  aspects,  then  spatially  averaging  the 
back  scattering  cross  section  over  all  these  aspect  angles?  As 
will  be  seen,  the  answer  appears  to  be  a qualified  affirmative  in 
that  the  spatial  average  backscattering  cross  sections  for  similar 
(i.e.,  same  number  of  dipoles  with  same  average  spacing)  but  dif- 
ferent clouds  do  differ  in  general,  so  that  it  is  not  sufficient 
to  spatially  average  only  one.  cloud  return  and  accept  that  as  a 
good  equivalent  ensemble  average.  One  must  generate  an  ensemble 
of  clouds,  obtain  a spatial  average  backscattering  cross  section 
for  each  and  then  obtain  an  ensemble  average  of  these  spatial 


averages.  The  point  being  that  this  latter  ensemble  is  smaller 
than  the  former,  thereby  demanding  fewer  calculations  of  mutual 
impedances,  etc.  with  resulting  enhanced  efficiency  of  computation 
(at  least  for  large  clouds).  In  all  our  work  we  obtain  ensemble 
averages  using  this  modified  ensemble  model,  which  we  call  the 
frozen  model. 

Going  one  step  further  in  the  search  for  computational  ef- 
ficiency, there  arises  the  proposition,  can  we  illuminate  one  or 
a few  similar  clouds  from  jane,  aspect  (requiring  the  calculation  of 
induced  currents  only  once  for  each  cloud  generated)  and  average 
the  bi static  scattering  cross  section  over  a range  of  bistatic 
angles  and  expect  this  average  to  be  simply  related  to  the 
ensemble  average  of  backscattering  cross  section?  Or  further, 
can  one  relate  the  average  of  total  scattering  cross  section  to 
the  ensemble  average  of  backscattering  cross  section?  The 
answer  to  both  these  propositions  appears  to  be  negative,  or  at 
least  the  relationships  are  not  clear  to  us  from  the  data  we 
have  generated. 

B,  Representative  Cloud  Characteristics 

In  the  previous  section,  we  discussed  the  frozen  model  of  a 
chaff  cloud  as  a substitute  for  the  more  complex  time-varying 
model,  under  the  assumption  that  the  scattering  characteristics 
derived  from  each  model  agree.  The  characteristics  which  we  have 
in  mind  are,  of  course,  statistical  in  nature  and  should  be  dis- 
cussed more  fully  so  that  the  reader  understands  the  results 
presented  later. 

Viewed  in  time,  the  monostatic  or  bistatic  echo  from  a cloud 
consists  of  an  average  return  plus  a scintillation  term.  The 
average  is  expected  to  change  as  the  cloud  blooms  - a symptom  of 
non-stationarity  - but  if  its  rate  of  change  is  slow  with  respect 
to  the  scintillation  rate,  the  scattering  process  might  be  con- 
sidered stationary  over  small  time  intervals.  With  each  such 
time  interval,  therefore,  are  associated  a mean  value,  i.e.,  the 
time  average  radar  cross  section,  a variance,  i.e.,  the  mean  square 
of  the  time-varying  component  of  the  radar  cross  section,  and  a 
frequency  spectrum  of  the  cross  section.  The  totality  of  all  such 
sets  of  quantities  taken  during  selected  time  intervals  constitute 
a partial  statistical  description  of  the  cloud  behavior. 

By  assuming  a frozen  model,  appropriate  to  one  of  the  above- 
mentioned  intervals  of  time  (i.e.,  with  average  dipole  spacing 
appropriate  to  the  time  interval  in  the  evolution  of  a blooming 
cloud),  we  substitute  viewing  angle  for  time  as  the  independent 
variable  and  obtain  a spatial  average  radar  cross  section.  As 
mentioned  earlier,  it  turns  out  that  this  spatial  average  radar 
cross  section  differs  from  cloud-to-cloud,  so  in  the  frozen  cloud 
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model  we  assume  an  ensemble  of  clouds  and  obtain  a distribution  of 
spatial  average  radar  cross  sections.  The  ensemble  average  of  this 
distribution  of  spatial  averages  is  assumed  to  be  equivalent  to 
the  time  average  radar  cross  section  for  the  time  interval  of 
interest.  From  this  distribution  we  also  obtain  a variance  of  the 
spatial  average,  a quantity  which  has  no  obvious  meaning  in  the 
time-averaging  process,  but  is  useful  for  estimating  a confidence 
level  fo1''  the  ensemble  average  cross  section  obtained  from  the 
frozen  model.  It  may  be  that  the  variance  of  the  spatial  average 
is  simply  related  to  the  variance  of  the  random  time  process, 
but  at  present  we  have  no  supporting  evidence  since  no  time- 
varying  clouds  have  been  generated. 

The  frequency  spectrum  of  the  frozen  model  is  not  expected 
to  equal  that  of  the  time-varying  cloud;  it  is  useful,  however, 
for  estimating  the  minimum  number  of  aspect  angles  at  which  to  view 
the  clouds  in  the  frozen  model,  since  a number  smaller  than  this 
causes  obvious  aliasing  of  the  spectrum. 

A more  quantitative  discussion  of  the  statistical  notions  and 
notation  employed  in  later  sections  of  this  report  are  presented  in 
Appendix  A. 

C.  Computer-Generation  of  Scattering  Data 
1.  Introductory  Remarks 

The  second  fundamental  assumption  underlying  this  work  is  that 
the  generation  of  volumes  of  scattering  data  necessary  for  a 
statistical  study  of  frozen  models  ultimately  is  more  efficient, 
convenient  and  inexpensive  by  means  of  a computer  than  by  laboratory 
experiment.  Experimental  data  were  considered  essential  to  the 
contract,  but  primarily  as  verification  of  corresponding  computed 
data.  We  leave  discussion  of  the  experimental  aspects  to  a later 
section  and  here  elaborate  on  the  computer-generation  of  scattering 
data. 

•jS 

The  computer-solution  of  scattering  by  a cloud  of  coupled 
resonant  dipoles  is  based  on  the  reaction  matching  technique  of 
Richmond  [9].  This  is  a moment  method  of  the  Galerkin  type,  i.e., 
in  which  the  testing  functions  and  basis  functions  are  identical. 

It  assumes  that  each  dipole  is  divided  into  P segments  (P  = 2 has 
been  found  to  be  satisfactory  for  the  configurations  discussed  in 
this  report),  and  a piecewise  sinusoidal  current  of  unknown  ampli- 
tude and  phase  is  assumed  to  flow  on  each  segment.  The  coupling 
(i.e.,  mutual  impedance)  between  each  such  segment  of  current  and 
any  other  segment  (or  itself)  can  be  expressed  in  the  form  of  a 
reaction  integral  (i.e.,  an  inner  product  integral)  from  which 
the  method  takes  its  name.  The  significant  fact  which  makes  the 
reaction  matching  technique  particularly  attractive  is  that  all 
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these  reaction  integrals  may  be  evaluated  in  closed  form,  thereby 
permitting  the  rapid  determination  of  all  the  elements  of  a N x N 
impedance  matrix  [Z]  (representing  all  self-and-mutual  impedances 
among  the  N/ dipoles  in  a cloud)  whose  inversion  yields  the  desired 
dipole  currents  (I)  induced  by  a plane  wave  (E)  incident  from 
any  angle.  This  technique  is  well  established  and  has  been  used 
to  obtain  scattering  data  for  many  wire  obstacles.  A more  detailed 
description  of  the  reaction  matching  technique  is  given  in  Appendix 
B. 


With  the  assurance  that  the  computer-generated  scattering  data 
are  within  the  tolerance  of  experimental  data,  we  turn  our  attention 
to  the  simulation  of  chaff  clouds  by  the  frozen  model.  Early  in 
the  program  the  N dipoles  in  a typical  cloud  were  assumed  to  be 
resonant  in  free  space,  randomly  oriented  according  to  a spherical 
probability  density  function  (i.e.,  all  orientations  equally  likely) 
and  randomly  located  according  to  a Gaussian  radial  density  with 
average  spacing  d/A  between  dipoles.  This  average  spacing  was 
obtained  by  considering  76%  of  the  N dipoles  to  be  located  within 
a sphere  of  radius  2.056,  where  6 is  the  standard  deviation  of  the 
aforementioned  Gaussian  radial  distribution.  The  volume  of  this 
sphere  is  equated  to  the  volume  of  a cube  which  itself  is  sub- 
divided into  0.76N  equal  cubes,  each  of  which  is  size  d/A  on  an 


edge  and  is  considered  to  contain  one  dipole,  yielding  d/A  = 

3.62  fT’'3  6/A.  Appendix  C contains  the  details  of  this  in- 


homogeneous cloud  generation. 


The  aforegoing  choice  of  a cloud  tapering  from  a dense 
central  region  to  tenuous  edge  blending  with  free  space  seemed 
logical  in  the  beginning.  An  actual  chaff  cloud  might  be  ex- 
pected to  display  such  an  inhomogeneity;  furthermore,  a uniformly 
dense  cloud,  for  high  densities,  might  be  expected  to  exhibit 
a coherent  scatter  from  the  abrupt  free  space-cloud  interface  as 
well  as  an  incoherent  part.  Our  choice  of  a tapered  density  re- 
duces the  coherent  part,  which  is  desirable  since  this  part 
would  be  dependent  upon  the  exact  shape  of  the  cloud,  which  in 
the  actual  case  is  unknown  and  changing  with  time.  At  the  same 
time,  however,  the  tapered  density  suffers  drawbacks.  The 
parameter  which  we  used  to  describe  the  tightness  of  the  dipoles, 
d/A,  or  "average  spacing",  is  an  average  over  a substantial  part 
of  the  cloud.  The  average  spacings  are  much  smaller  than  this 
number  near  the  cloud  center  and  much  larger  closer  to  its 
edge.  As  the  program  progressed,  it  became  clear  that  it  would 
be  better  to  assume  clouds  with  uniform  densities  so  that  trends 
in  the  various  methods,  such  as  the  sparse  matrix  and  the  iterative, 
could  be  correlated  with  respect  to  a more  uniquely  defined  average 
spacing  (or  density)  parameter.  The  details  of  the  homogeneous 
cloud  generation  are  contained  in  Appendix  C. 


**  > wap  - 


We  state  here  once  and  for  all  that,  except  where  noted,  all 
results  appearing  in  this  report  are  based  on  the  Gaussian  radial 
distribution  for  the  cloud.  The  reader  will  find  uniformly  dense 
clouds  assumed  only  in  the  section  describing  indirect  methods. 

2.  Direct  Methods 

(a)  Theoretical  Considerations 

As  discussed  above,  and  in  more  detail  in  Appendix  II,  the 
electromagnetic  scattering  problem  can  be  transformed  via  the 
method  of  moments  into  an  N x N matrix  equation  of  the  form 

(1)  ZI  = V 

where  the  right  hand  vector  V is  known  from  the  direction, 
polarization,  and  strength  of  the  known  incident  plane  wave  and 
the  elements  of  the  Z matrix  can  all  be  calculated  using 
reaction  matching.  The  problem  is  to  determine  the  current 
vector  I,  each  component  of  which  is  the  current  I induced  on 
the  nth  chaff  dipole. 

A direct  solution  for  nonsingular  Z can  be  expressed  in 
terms  of  the  inverse  matrix  Z-l ; i.e., 

(2)  I = Z_1V 

However,  the  solution  process  may  or  may  not  include  actual  com- 
putation of  the  inverse.  Practical  examples  of  solutions  ex- 
pressible in  the  form  of  Eq.  (2)  are  Gaussian  elimination  and  LU 
decomposition.  Both  of  these  methods  are  based  on  triangulari- 
zation  of  Z;  Gaussian  elimination  yields  one  solution  per 
triangularization  whereas,  LU  decomposition  yields  any  number  of 
solutions  for  different  right  hand  side  vectors.  LU  decomposition 
represents  a class  of  compact  methods  including  the  Crout, 
Doolittle  and  Choleskey  methods  [37]  which  do  not  require  storage 
of  intermediate  matrices  during  triangularization  as  does 
Gaussian  elimination.  Final  elements  of  the  triangular  form 
are  obtained  by  accumulation  and  when  done  in  double  precision 
arithimetic  and  rounded  to  single  precision  before  storage, 
solutions  by  any  of  these  methods  will  contain  a minimum  of 
roundoff  error.  Solutions  to  certain  electromagnetic  problems 
require  repeated  responses  to  variety  of  excitations.  LU  de- 
composition methods  are  well  suited  to  this  requirement  and  are 
probably  the  most  widely  used  in  electromagnetic  computations. 
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Successful  decomposition  or  factorization  of  a matrix  is 
based  on  the  LU  theorem.  The  theorem  is  stated  as  follows: 
Let  Z|<  represent  the  kth  principal  submatrix  of  Z,  formed  by 
eliminating  n-k  rows  and  columns  from  Z.  If 


(3)  det  Zk/0,  k = 1 ,2 , . - -n-1 , 

then  there  exist  two  unique  triangular  matrices  L = U-jj]  and 
U = [uij],  with  L the  unit  lower  triangular  (i.e.,  ones  on  the  main 
diagonal  and  zeros  above  the  diagonal)  such  that 


(4)  Z = LU 


and 

n 

(5)  Jet  Z =Tf  u. . . 

i 11 

The  U matrix  in  this  case  is  the  same  upper  triangular  matrix  ob- 
tained by  performing  Gaussian  elimination  and  L is  related  to 

the  sequence  of  matrices  Mfc,  k=l  n-1 , which  accomplished  this 

triangularization.  Details  of  computing  elements  of  L and  U are 
left  to  Appendix  I of  Reference  38.  Equation  (1)  can  now  be  restated 
in  factored  form  as 


(6)  LU  I = V 


and  the  solution  is  computed  by  setting 


(7)  UI  = I 


in  Eq.  (6)  and  solving  the  resulting  triangular  system  for  I by 
forward  substitution.  This  solution  is  then  substituted  back 
into  Eq.  (7)  and  the  final  triangular  system  is  solved  by  back- 
ward substitution.  These  forward  and  backward  substitutions  are 
the  only  calculations  needed  for  other  solutions  to  the  same  sys- 
tem with  different  E (excitation)  vectors.  The  factored  form  of 
Z defined  by  Eqs.  (4)  and  (5)  is  referred  to  by  Westlake  [39]  as 
Doolittle  decomposition.  The  familiar  Crout  decomposition  as 
described  by  Westlake  performs  lower  triangularization  on  Z and 


U becomes  unit  upper  triangular.  Choleskey's  method,  or  the 
square-root  method,  requires  Z to  be  at  least  symmetric.  Fac- 
torization in  this  case  leads  to  the  form 


(8) 


GG 


(T  denotes  transpose)  with  the  determinant  given  by 


(9) 


N 


det  Z = ^ (9,,)' 


Gaussian  elimination  along  with  the  Crout  and  Doolittle  methods 
generally  gives  better  results  when  a column  reordering  strategy  is 
used  on  Z(k)  to  position  the  element  of  largest  absolute  magnitude 
in  the  kth  row  in  the  pivotal  position  (diagonal)  at  the  kth  step 
of  the  triangularization  process.  Choleskey's  method,  on  the 
other  hand,  does  not  require  this  repositioning  strategy  when  ap- 
plied to  positive  definite  matrices.  The  EM  problems  treated  in 
this  study  result  in  complex  symmetric  (nonhermitian)  matrices  and 
in  general  this  partial  positioning  process  should  be  included. 
Experience  has  shown,  however,  that  for  most  EM  problems  solved  in 
this  manner,  sufficient  accuracy  is  obtained  without  pivoting  in 
spite  of  the  indefiniteness  of  the  coefficient  matrix.  Elements 
along  the  main  diagonal  generally  are  larger  in  magnitude  than  the 
off  diagonal  elements  which  no  doubt  contributes  to  this  char- 
acteristic. 


The  size  of  a particular  computer's  fast  access  memory  along 
with  growth  of  roundoff  accumulation  are  inherent  limitations  of 
these  methods.  The  size  problem  can  be  overcome  to  a certain  extent. 
However,  unless  precision  is  also  improved,  roundoff  must  eventually 
obscure  acceptable  solutions.  One  method  for  studying  conditions 
which  affect  solution  errors  is  to  compute  a relative  error  bound 
for  the  solution  algorithm  being  used.  Relative  error  is  ex- 
pressed in  the  form 


(10) 


Relative  Error  = 


±JU 


ii  i ii 


where  I and  I represent  the  exact  and  computed  solutions, 
respectively,  to  Eq.  (1)  and  ||.||  signifies  an  appropriate 
vector  norm.  Definitions  of  useful  vector  and  matrix  norms 
are  given  in  Appendix  C of  Ref.  [38], 
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Error  bounds  naturally  tend  to  be  conservative  and  are  often 
considered  useless  for  this  reason.  Nevertheless,  bounds  con- 
sidered in  proper  perspective  can  yield  information  otherwise 
unavailable  to  the  user.  Computation  of  a bound  based  on  the 
number  of  unknowns  (N),  the  algorithm,  and  the  precision,  may  reveal 
trends  which  can  bring  confidence  or  a note  of  caution  into  play 
and  is  justified  if  only  to  indicate  such  a trend  is  possible  when 
pushing  the  limits  of  a particular  machine's  size  and  accuracy. 

More  discussion  of  condition  numbers  and  error  bounds  appears 
in  Ref.  [38]. 


(b)  Calculated  Results  for  Chaff  Clouds 

Using  the  computer  routines  based  upon  the  method  of  Crout 
and  documented  in  Appendix  II  of  Reference  12,  clouds  with  N = 10, 

15,  20,  25,  30,  50,  100,  150,  200  dipoles  were  considered  for 
average  spacings,  d/x  = 0.5,  1.0,  1.5,  2.0.  Not  all  combinations  of 
(N,  d/x)  were  investigated  equally  intensively  since  computations 
for  larger  N values  are  time-consuming  and  certain  trends  could  be 
discerned  without  them.  Most  work  concentrated  on  clouds  with 
N i 30,  and  on  the  backscattering  cross  section.  Figures  1-4  show 
the  average  backscattering  cross  section  <om>  of  the  mth  cloud  in  an 
ensemble  of  M = 29  clouds  in  the  frozen  model,  where  1 ^ m < M. 

These  figures  give  data  for  clouds  containing  up  to  N = 30  cfi poles 
and  average  spacings  d/x  = 0.5,  1.0,  1.5,  2.0.  As  expected,  the 
values  of  <om>  distribute  themselves  over  a range  (note  that  where 
the  density  of  dots  in  Figs.  1-4  is  high,  they  are  plotted  aside  one 
another),  so  it  is  appropriate  to  present  an  average  value  of  the 
<am>,  which  we  denote  by  <a>.  This  has  been  done  in  Figs.  5-8, 
where  <o5  is  represented  by  a point.  For  the  cases,  N = 10,30,  which 
were  investigated  more_extensively , the  ranges  which  enclose  95.45% 
of  all  the  values  of  <am>  can  be  represented  by  a vertical  line  (ex- 
tending from  <a>- 2 Smeap  to  <o>  +2Smean)»  where  Smean  is  the  standard 
deviation  of  the  distribution  of  <am>.  The  details  of  the  distri- 
butions of  <am>  are  discussed  more  fully  in  Appendix  I;  here,  it 
suffices  to  say  that  these  curves  give  some  idea  of  the  expected 
cross  section  from  a cloud  of  chaff  with  coupling  as  a function  of 
number  of  dipoles  and  average  dipole  spacing  (i.e.,  dipole  density). 
In  Figs.  1-8,  each  straight  line  represents  the  ideal  case  of  no 
coupling,  in  which  case  the  average  cross  section  of  N dipoles  is 
expected  to  be  simply  N times  <a o>,  the  average  cross  section  of  a 
single  resonant  dipole.*  If  the  average  cross  section  of  a single 
resonant  dipole  is  defined  to  be  the  cross  section  of  that  dipole 
averaged  over  all  possible  tumble  angles,  equally  weighted  (spherical 


*Actually,  this  straight  line  is  an  approximation  strictly  valid  for 
uniform  density  clouds.  However,  for  the  non-uniform  clouds 
considered  here,  it  is  an  extremely  good  approximation. 


probability  density  function  for  orientation),  then  <o0>  is  equal 
to  about  1/5  times  the  maximum  cross  section  of  the  dipole,  or 
<oo>£0,15A  . From  these  curves  it  is  evident  that  with  an  average 
spacing  of  d/x  = 2.0,  the  curve  N<o0>  fairly  well  predicts  the 
values  of  <a> , implying  that  coupling  effects  are  weak  and  decoupled 
theory  may  _as  well  be  applied.  But  as  d/x  decreases  below  2.0  the 
values  of  <a>  drops  below  those  predicted  by  the  curve  N<Oq>  for 
the  decoupled  dipoles.  Although  fewer  clouds  were  investigated 
for  N > 30,  the  same  trends  persist,  as  indicated  by  Figs.  9 and  10. 


Although  most  data  generated  were  of  backscattering  cross 
section,  some  bistatic  scattering  cross  sections  were  investigated 
as  well.  Figures  11-14  present  results  for  rather  dense  clouds 
(d/A  £ 0.59)  and  bistatic  angles  B = 0°  (monostatic),  45°,  90°, 

135°  for  vertical -to- vertical  and  vertical-to-horizontal  polari- 
zations. Computed  data  appear  as  circles  and  measured  data  appear 
as  solid  dots.  (The  methods  used  to  obtain  the  experimental  data 
are  described  below).  Again,  the  straight  lines  N<o0(b)> 
represent  the  ideal  case  of  uncoupled  elements,  where  <o0(b)>  is. 
the  tumble  average  bistatic  cross  section  a single  resonant  dipole, 
calculated  according  to  the  formula, 


CQituiaucu  aL^ui  u my  uu  uic  i ui  mu  la  | 

(11)  <cq(b)>  = 0.05a  [1+2  (cos  c*t  cos  «r  + cos  b sin  sin  a ) ] 


where  at  and  ar  are  the  angles  of  the  polarization  vectors  as 
shown  in  the  accompanying  sketch.  In  every  case,  we  ohserve  the 
same  phenomenon  - coupling  effects  a decrease  in  average  cross 
section  for  both  polarization  combinations  and  all  bistatic 
angles. 
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Figure  1.  Calculated  average  backscattering  cross  sections  for  ensembles 
of  clouds  containing  N < 30  dipoles  with  an  average  spacing 
d/x  = 2.  Straight  line" represents  decoupled  dipoles. 
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Figure  2 
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Calculated  average  backscattering  cross  sections  for  ensenfcle 
of  clouds  containing  N < 30  dipoles  with  an  average  spacing 
a/A  - 1.5.  Straight  line  represents  decoupled  dipoles. 
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Figure  3.  Calculated  average  backscattering  cross  sections  for  ensembles 
of  clouds  containing  N <_  30  dipoles  with  an  average  spacing 
d/x  = 1.0.  Straight  line  represents  decoupled  dipoles. 
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Figure  6.  Calculated  ensemble  averages  of  the  spatial  averages  shown  in 
Fig.  2.  Straight  line  represents  decoupled  dipoles. 
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Figure  7.  Calculated  ensemble  averages  of  the  spatial  averages  shown  ir. 
Fig.  3.  Straight  line  represents  decoupled  dipoles. 
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Figure  8.  Calculated  ensemble  averages  of  the  spatial  averages  shown 
Fig.  4.  Straight  line  represents  decoupled  dipoles. 
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Calculated  snatial  average  backscattering  cross  sections  for  ensembles  of  clouds 
containing  50  < N < 200  dipoles  with  an  average  spacing  d/\  = 2.  Straight  line 
represents  decoupled  dipoles. 
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To  obtain  the  bi static  scattering  data  of  Figs,  11 -l 4 up  to 
800  polyfoam  spheres,  each  containing  a dipole,  were  enclosed  in  a 
polyethelene  bag  which  was  rotated  by  means  of  strings.  Horizontal 
polarization  was  transmitted  to  minimize  string  reflections  and  as 
the  bag  was  rotated  a cross  section  pattern  was  recorded  and  automatically 
averaged.  Between  runs,  the  bag  was  jostled  to  form  a new  cloud 
so  that  a variance  could  be  observed  for  the  average  return. 

Figure  15  shows  the  calculated  spatial  average  backscatter 
as  a function  of  frequency  of  four  particular  random  clouds  of 
N = 30  dipoles  each.  In  this  figure,  vertical-to-vertical  polari- 
zation is  assumed  and  a/\  is  the  electrical  length  of  each  dipole 
which  is  varied  through  the  resonance  region.  The  curves  marked 
N<a0>  is  for  the  ideally  decoupled  case  and  the  other  curves  are 
for  average  spacings  for  each  cloud  of  d/x  =2.0  and  0.5.  As 
expected,  the  closer  spacing  reduced  the  backscatter,  but  it  does 
not  significantly  change  the  frequency  of  resonance.  This  result 
leads  us  to  conclude  that  it  is  fruitless  to  seek  a chaff  cloud 
which  blooms  to  a higher  value  of  radar  cross  section  than  ex- 
pected early  in  its  evolutionary  history  by  cutting  the  dipoles 
to  any  length  other  than  the  free  space  resonant  length. 

3.  Sparse  Matrix  Methods 

(a)  Theoretical  Considerations 

In  addition  to  the  gathering  of  computed  and  measured  data 
to  obtain  averages  of  backscattering  cross  sections,  some  effort 
has  been  directed  at  alternative  methods  for  solving  large  matrix 
equations.  The  reaction  method  of  Richmond  leads  to  kernel  matrices 
of  the  order  N x N which  effectively  must  be  inverted  by  one  method 
or  another.  Using  Crout-type  methods  just  discussed  and  a large 
scale  computer  limit  N to  about  250;  if  more  dipoles  than  this  are 
of  interest  other  methods  must  be  sought  to  overcome  the  storage 
and  time  problems.  In  this  and  the  following  section  we  discuss 
two  methods  which  we  investigated  - sparse  matrix  and  iterative 
techniques . 

Before  launching  into  a discussion  of  these  techniques,  it  is 
appropriate  to  enquire  why  ore  is  interested  in  larger  numbers  of 
dipoles,  especially  since  informaton  concerning  far  scattered 
data  are  more  easily  derived  from  smaller  clouds.  The  answer  lies 
in  the  intent  to  characterize  a chaff  cloud  by  more  than  its 
average  cross  section,  in  particular,  to  calculate  the  fields  inside 
a cloud  as  a function  of  depth  of  penetration  and  obtain  some 
insight  to  the  extinction  and  phase  shift  incurred.  In  order  to 
obtain  a substantial  depth,  it  may  be  necessary  to  account  for 
more  than  250  dipoles,  in  which  case  new  computer  methods  are 
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necessary.  Such  information  would  be  useful  for  estimating  the 
thickness  of  a layer  of  dipoles  beyond  which  additional  dipoles 
add  very  little  to  the  average  backscatter. 


The  solution  to  the  problem  of  scattering  from  a cloud  of 
N dipoles  involves  a system  of  N equations  in  N unknowns.  Each 
of  these  equations  contains  N tarms.  Since  all  N?  terms  must  be 
stored,  even  large  computer  systems  run  out  of  fast-access  memory 
for  relatively  few  (N  < 300)  dipoles.  In  order  to  study  larger 
clouds,  some  means  of  reducing  the  number  of  stored  elements  is 
requi red. 

The  terms  in  the  equations  relate  to  the  interaction  (mutual 
impedance)  between  pairs  of  dipoles  in  the  cloud.  For  dipoles  that 
are  widely  separated  or  nearly  perpendicular  to  each  other,  the 
associated  mutual  impedance  can  become  quite  small.  If  some 
threshold  level  is  chosen  for  the  magnitude  of  the  mutual  impedance 
and  all  mutual  impedances  below  this  threshold  are  ignored  (i.e., 
set  to  zero),  an  approximate  solution  to  the  scattering  problem 
may  be  obtained.  The  often-used  assumption  of  completely  in- 
dependent dipoles  is  an  extreme  example  of  this  type  of  approxi- 
mation. Systems  of  linear  equations  of  this  type  (i.e.,  where 
each  equation  contains  only  a few  terms)  may  be  solved  by  what  are 
known  as  sparse  matrix  methods. 

Sparse  matrix  methods  are  similar  to  other  techniques  (e.g., 
Crout,  Gauss  reduction),  except  that  only  non-zero  terms  are  stored 
and  only  operations  involving  non-zero  terms  are  performed.  Thus 
they  are  faster  and  require  less  storage  when  applicable. 


In  order  to  determine  whether  such  an  approximate  solution 
can  be  used  for  studying  chaff  clouds,  a few  tests  were  run  using 
standard  solution  techniques  (i.e.,  without  implementing  the  time- 
and  storage-saving  algorithms)  for  several  values  of  the  threshold 
mentioned  earlier.  In  this  way  the  applicability  of  sparse  matrix 
techniques  could  be  determined  before  effort  was  expended  to 
develop  specialized  computer  programs. 


Setting  the  threshold  to  a value  equal  to  10%  of  the  magnitude 
of  the  dipole  self-impedance  resulted  in  a satisfactory  percentage 
of  zeros  (nearly  80%)  in  the  impedance  matrix  for  several  test 
clouds.  The  bistatic  scattering  patterns  of  twenty  thirty-dipole 
clouds  (with  d/x  = 0.5)  were  calculated  using  both  the  full  im- 
pedance matrix  and  the  sparse  matrix  obtained  with  the  10%  thresh- 
old described  above.  Each  pattern  was  averaged  over  360°  of 
bistatic  angle  and  for  each  cloud  the  average  obtained  using  the 
full  matrix  solution  was  compared  with  the  average  obtained  using 
the  sparse  matrix  solution.  The  percentage  error  for  each  of  the 
twenty  clouds  is  listed  in  Table  I (where  a + error  means  the 
sparse  matrix  yielded  an  average  higher  than  did  the  full  matrix). 
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Figure  12.  Measured  values  of  the  spatial  average  cross  se 
clouds  containing  50  < N < 800  dipoles  with  ave 
Bi static  angle  6=45°.  Straight  line  represents 
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Measured  and  calculated  values  of  the  spatial  average  cross  sections  of  ensembles  of 
clouds  containing  50  < N < 800  dipoles  wit!,  average  spacings  d/x  i 0.5-0. 6. 

Bistatic  angle  6=135°.  Straight  line  represents  decoupled  dipoles. 
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Figure  15,  Average  backscatter  as  a function  of  frequency 
of  four  random  clouds, 
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The  average  error  was  5.3%  and  the  average  absolute  error  was  6.8%, 
well  within  tolerance  levels  of  practical  measurements. 

From  these  calculations  it  appeared  feasible  to  further  de- 
velop sparse  matrix  programs  for  use  on  chaff  cloud  scatter  calcu- 
lations. 

TABLE  I 

PERCENT  ERROR  IN  BISTATIC  AVERAGES  CAUSED  BY  SETTING  MUTUAL 
IMPEDANCES  BELOW  (0.1)  (Z^)  TO  ZERO. 


-4.2 

-7.7 

+10.2 


+ 2.9 
+10.0 
+ 4.8 


+11.9 
+13.3 
+ 3.5 


+8.7 
+13.8 
+ 4.3 


Sparse  matrix  methods  require  that  a special  scheme  be  used 
to  index  the  stored  elements  of  the  matrix.  Also  most  direct 
methods  of  solving  systems  of  linear  equations  operate  on  the 
matrix  to  produce  a new  matrix  which  in  general  is  not  sparse  even 
though  the  original  matrix  was  sparse.  Sparse  matrix  methods  require 
that  this  new  matrix  be  sparse  as  well.  These  two  requirements 
have  been  approached  and  formulated  in  a variety  of  ways  [40-45]. 

The  approach  used  here  is  that  given  by  Berry  [44].  The  off- 
diagonal  non-zero  elements  of  the  upper  trianagular  portion  of  the 
matrix  are  stored  consecutively  in  linear  array  U.  The  diagonal 
elements  (which  are  all  non-zero)  are  stored  in  a linear  array  D, 

Two  pointer  arrays  II  and  0 are  used  to  index  the  array  U.  1 1 ( K) 
contains  the  starting  location  of  row  K in  U and  J contains  the 
column  indices  of  the  elements  in  the  same  order  as  the  elements 
as  contained  in  U.  An  example  given  by  Berry  [44]  should  help 
c^rify  this  scheme.  For  the  matrix  Y given  below,  the  arrays 
would  be  as  follows: 


11 

0 

y13 

0 

y22 

y23 

y24 

31 

y32 

y33 

y34 

1 

y42 

y43 

y44 

51 

0 

0 

0 

-I J'J  MUJ. 


11(1)  = 1 

J(l)  = 3 

U(1>  = *13 

DO)  = yn 

11(2)  = 3 

J(2)  = 5 

u(2)  = y)5 

0(2)  = y22 

11(3)  = 5 

J(3)  = 3 

U(3)  = y23 

= y33 

11(4)  = 6 

J(4)  = 4 

U(4)  = y24 

0(4)  = y44 

11(5)  = 6 

J ( 5 ) = 4 

U(5)  = y34 

0(5)  = y55 

A specialized  matrix  decomposition  known  as  the  "square  root 
method"  [46]  is  used  to  solve  the  system  of  equations.  This 
method  is  similar  to  those  associated  with  the  names  Gauss, 

Crout,  Doolittle,  Cholesky,  Banachiewicz,  etc.  [47]. 

Before  decomposition,  the  algorithm  given  by  Barry  is  used 
to  determine  a renumbering  of  the  unknown  (pivoting  on  the  diagonal) 
such  that  the  number  of  non-zero  elements  in  the  auxiliary  matrix 
produced  by  the  decomposition  is  reduced.  The  advantage  of  this 
renumbering  is  easily  seen  in  a couple  of  examples.  Figure  16  shows 
the  structure  of  an  11  by  11  matrix  and  its  auxiliary  before  re- 
numbering. Crosses  represent  non-zero  elements  occuring  in  both 
the  original  matrix  and  its  auxiliary.  Zeros  represent  non-zero 
elements  occuring  only  in  the  auxiliary  matrix,  i.e.,  non-zero 
elements  that  were  introduced  by  the  decomposition.  Blanks  repre- 
sent zero  elements  occuring  in  both  the  original  matrix  and  its 
auxiliary.  Figure  17  shows  the  structure  of  the  matrix  after 
renumbering  and  the  structure  of  the  auxiliary  of  this  new  matrix 
in  the  same  way.  The  renumbering  used  was  as  follows: 

original  unknown  no.  1 2 3 4 5 F 7 8 9 10  11 

new  unknown  no.  1 9 7 6 5 2 3 8 4 10  11 

The  structure  of  Fig.  17  may  be  obtained  from  that  of  Fig. 

16  and  the  above  table.  For  example:  to  generate  the  seventh 
row  of  Fig.  17,  first  note  that  the  seventh  unknown  in  the  re- 
numbered system  was  the  third  unknown  in  the  original  system. 

This  means  that  the  third  row  of  the  original  matrix  is  the 
seventh  row  of  the  new  matrix.  Columns  have  also  been  inter- 
changed according  to  this  same  renumbering  so  that  Z33  Z77. 

To  fine  the  other  ele<nents  in  the  new  seventh  row,  note  i r Fig. 

16  that  the  off-diagonal  elements  in  row  3 are  Z34,  235,  and 
Z38  and  convert  both  subscripts  as  given  in  the  table' to  obtain 
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The  structure  of  an  11  x 11  matrix  and  its  auxiliary  before 
renumbering.  Crosses  are  non-zero  elements  occuring  in  both 
matrices;  zeros  are  non-zero  elements  occuring  only  in  the 
auxiliary;  blanks  are  zero  elements  in  both  matrices. 


Fig.  16. 


The  structure  of  the  11  x 11  renumbered  matrix  of  Fig.  16  ar 
its  auxiliary.  Symbols  are  the  same  as  in  Fig.  16. 


ig.  17. 


z34  "*■  z76»  z36  z72»  and  z38  * z78  which  is  the  structure  shown  i r. 

Fig.  17. 


Figures  18  and  19  show  the  structure  of  a 28  by  28  matrix 
before  and  after  renumbering  in  the  same  way. 

The  renumbering  used  in  this  case  was  as  follows: 


original 

1 

2 

3 

4 

5 

6 7 

8 

9 10  11  12  13  14 

new 

9 

18 

24 

22 

8 

20  14 

21 

27  15  19  16  13  17 

original 

15 

16 

17 

18 

19  20  21 

22  23  24  25  26  27  28 

new 

25 

28 

7 

5 

4 3 2 

1 26  23  10  6 11  12 

The  number  of 

non- 

-zero 

i elements 

occuring 

in 

the  auxiliary  matrix  is 

substantially  reduced  by  the  renumbering  as  may  be  seen  by  comparing 
the  number  of  zeros  in  Figs.  16  and  18  with  the  number  of  zeros  in 
Figs.  17  and  19. 

(b)  Calculated  results  for  Chaff  Clouds 

In  order  to  estimate  the  savings  in  time  and  computer  storage 
requirements  resulting  from  use  of  the  sparse  matrix  algorithm,  a 
study  was  made  of  these  parameters  using  the  ElectroScience 
Laboratory  Datacraft  6024  computer  and  the  Wright-Patterson  Air 
Force  Base  CDC  6600  computer. 

In  particular,  it  would  be  useful  to  obtain  some  estimate 
of  the  number  of  non-zero  elements  which  are  regarded  as  sig- 
nificant enough  to  retain  and  store.  If  we  regard  as  zero  any 
elements  in  the  impedance  matrix  whose  magnitude  is  less  than 
10%  cf  the  magnitude  of  the  self  impedance  (diagonal)  elements, 
and  we  calculate  the  number  of  non-zero  elements  remaining  in 
the  upper  triangle  matrix  (Table  2),  we  can  obtain  the  percent 
of  non-zero  elements  in  the  upper  triangle  (Table  3),  The 
numbers  presented  in  these  tables  are  averages  of  values  ob- 
tained from  10  randomly  generated  clouds  for  each  combination 
of  average  spacing  d/x  and  number  of  dipoles  N. 


Fig.  18.  The  structure  of  a 28  x 28  matrix  and  its 
auxiliary.  Symbols  are  the  same  as  in 
Fig.  16. 
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Fig.  19.  The  structure  of  the  28  x 28  renumbered 
matrix  of  Fig.  18  and  its  auxiliary. 
Symbols  are  the  same  as  in  Fig.  16. 


The  average  numbers  presented  in  Table  2 are  plotted  vs  N 
with  d/X  as  a parameter  in  Figs.  20  and  21.  They  all  show  a 
remarkably  linear  character,  indicating  that  significant 
coupling  (non  zero  elements)  exists  between  an  arbitrary  dipole 
and  only  its  neighbors,  inside  a surrounding  "volume  of  influence". 
Thus,  with  d/x  fixed  and  N increasing,  we  expect,  and  do  observe, 
the  number  of  non-zero  elements  to  increase  proportionally  to  N, 
not  N2.  Consequently,  the  percent  of  non-zero  elements  for  a 
fixed  d/x  decreases  as  1/N  with  increase  in  N.  Recalling  the  rule 
of  thumb  that  this  percent  should  not  exceed  about  20%  if  sparse 
matrix  techniques  are  to  be  effective,  we  see  that  this  condition 
is  satisfied  for  all  d/X  >0.5  for  n > 200,  a fortiori  for  the 
larger  d/x  values.  The  absolute  number  of  non-zero  elements, 

(Table  2)  or  course,  determines  the  memory  required  of  the  com- 
puter. Extrapolating  the  linear  curves  of  Figs.  20  and  21,  it 
appears  that  a capability  of  storing  20,000  non-zero  elements 
(about  the  number  of  elements  in  the  upper  triangle  of  the  full 
matrix  associated  with  a cloud  of  200  fully  coupled  elements  - 
an  entirely  feasible  problem  of  the  W-P  computer)  permits  the 
sparse  matrix  solution  of  clouds  containing  approximately  1100, 

5300,  15,300,  and  32,000  dipoles  if  the  average  spacings  d/x  are 
0.5,  1.0,  1.5,  and  2.0,  respectively.  Investigations  involving 
time  savings,  described  later,  lead  us  to  less  optimistic 
estimates . 

The  variation  of  the  number  of  non-zero  elements  in  the  upper 
triangle  with  d/x,  N fixed,  is  not  as  clearly  explainable  in 
physical  terms  as  is  the  variation  with  N,  d/x  fixed.  If  we  con- 
sider each  dipole  to  be  coupled  only  to  m neighbors  within  a 
surrounding  "volume  of  influence",  then  the  number  m should  he  equal 
to  the  number  of  non-zero  elements  in  the  upper  triangle  divided  by 
N.  Performing  this  operation  on  Table  2,  we  obtain  Table  4,  and 
observe  that,  except  for  the  smallest  spacing  d/x  =0.5,  the  values 
of  m (i.e.,  the  number  of  elements  in  a "volume  of  influence")  are 
approximately  independent  of  N,  as  one  would  expect.  For  d/x  = 0.5, 
clouds  with  lesser  values  of  N probably  are  too  small  to  obtain  fair 
values  for  m,  so  we  presume  those  values  of  m obtained  for  the 
largest  clouds  (N  = 200)  are  most  accurate.  Accepting  these  latter 
numbers,  one  recognizes,  of  course,  that  they  are  only  symbol i c of 
the  influence  of  coupling;  they  only  give  some  indication  of  the 
(integer)  number  of  neighbors  which  are  effectively  coupled  to  a 
given  element  in  some  average  sense.  We  can  venture  one  step 
further  and  assume  that  each  "volume  of  influence"  is  a "sphere 
of  influence",  with  volume  Vd/x  = (d/x)3m  (where  the  subscript 
recognizes  that  the  "sphere  of  influence"  has  a size  which  is 
probably  dependent  on  the  cloud  density,  i.e.,  d/x).  Doing  this 
for  N = 200,  the  radii  in  wavelengths  Rd/x/x  of  the  "spheres  of 
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AVERAGE  NUMBER  OF  NON-ZERO  TERMS 
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Figure  21,  Average  number  of  non-zero  terms  in  the  upper 
triangle  of  the  sparse  matrix  using  10%  rule. 


TABLE  2 

NUMBER  OF  NON-ZERO  TERMS  IN  UPPER  TRIANGLE 


N 

d/A 

50  100 

150 

200 

I 

2.0 

30  62 

86 

125 

1.5 

62  130 

190 

260 

Sparse 

Matrix 

1.0 

160  360 

600 

750 

0.5 

550  1500 

2800 

3500 

TABLE  3 

% OF  NON- 

■ZERO  TERMS 

IN  SPARSE  MATRIX  UPPER 

TRIANGLE 

JL 

d/A 

50 

100 

150 

200 

2.0 

2.45% 

1.25% 

0.77% 

0.63% 

1.5 

5.06% 

2.62% 

1.70% 

1 . 30% 

1.0 

13.06% 

7.27% 

5.37  % 

3.75% 

0.5 

44.90% 

30.30% 

25.05% 

17.58% 

TABLE  4 

m,  THE  NUMBER  OF  ELEMENTS  IN  A 

"SPHERE  OF 

INFLUENCE 

j N 

50 

100 

150 

200 

1 d/A 

2.0 

0.6 

0.62 

0.573 

0.625 

1.5 

1.24 

1.3 

1.26 

1.3 

1.0 

3.2 

3.6 

4.0 

3.75 

0.5 

11.0 

15.0 

18.7 

17.5 

40 

influence"  are  found  to  be  2.35,  2.18,  2.07,  and  1.73  for  spacings 
d/A  of  2.0,  1.5,  1.0  and  0.5,  respectively.  Although  more  data 
would  be  necessary  to  substantiate  it,  this  variation  in  Rd,,/A 
appears  to  be  a linear  increase  with  d/A,  as  shown  in  Fig,  22. 

The  fact  that  the  "radius  of  influence",  Rd/X/A,  decreases  as  the 
cloud  becomes  more  dense,  i.e.,  as  d/A  decreases,  could  be  ex- 
plained by  the  increased  shielding  effect  of  the  outermost  elements 
from  the  center  dipole  of  interest  by  those  elements  in-between. 

And  the  fact  that  the  values  of  Rj/xA  exceed  2,0  for  the  larger 
spacings  lends  credence  to  our  present  analysis  because  previous 
data  showed  the  dipoles  to  be  essentially  decoupled  for  these 
larger  spacings. 

All  the  foregoing  work  is  based  upon  the  10%  threshold  level 
below  which  a matrix  element  is  regarded  as  zero.  The  question 
arises,  how  severely  does  this  change  the  scattering  cross  section 
and,  in  particular,  the  spatial  average  backscatter  from  that  which 
would  be  obtained  using  the  full  matrix?  To  show  the  effect  of 
sparsing  the  impedance  matrix  we  present  in  Figs.  23-26  backscat- 
tering  patterns  (same  sense  polarizations  of  transmitter  and 
receiver  for  clouds  containing  N = 30  dipoles  with  two  different 
average  spacings,  d/A  =0.5  and  2.0,  calculated  on  the 
ElectroScience  Laboratory  computer  using  th*  full  matrix  and  the 
sparse  matrix  (with  10%  spursing  rule).  We  expect  that  the 
sparsed  matrices  for  these  clouds  contain  about  95%  zeros  when 
d/A  =2.0  and  about  50%  zeros  when  d/A  = 0.5.  Of  course,  as  N 
increases,  these  percentages  will  increase.  A similar  set  of  - 
calculations  were  performed  on  the  Wright-Patterson  Air  Force  Base 
CDC-6600  computer  for  three  different  clouds  containing  N=200  dipoles, 
each  0.475  wavelengths  long,  and  with  average  spacing,  d/A=2.0.  Figures 
27-29  compare  superimposed  backscattering  patterns  (same  sense 
polarizations  and  cross  polarizations  of  transmitter  and 
receiver)  using  the  full  matrix  and  sparse  matrix  (with  10% 
sparsing  rule).  Figures  30-41  show  similar  patterns  for  two 
other  clouds  with  N = 200,  d/A  =2.0.  We  expect  that  the 
sparsed  matrices  for  these  clouds  contain  about  99.4%  zeros 
(see  Table  3). 

All  these  patterns,  particularly  those  for  the  N = 200 
clouds,  are  interesting  because  they  display  three  features  worth 
mentioning.  First,  the  patterns  show  differences  in  fine  structure 
but  are  very  similar  in  gross  structure  in  all  cases.  Second, 

Figs.  25-41,  all  for  average  spacings  d/A  =2.0,  show  a 
recognizable  repetition  of  the  pattern  every  180°,  i.e.,  the 
backscattering  pattern  behaves  about  the  same  when  the  cloud  is 
viewed  from  a selected  direction  or  from  the  opposite  to  that 
direction.  Furthermore,  the  patterns  corresponding  to  the 
sparsed  matrix  show  this  symmetry  even  more  than  do  those  for  the 
full  matrix.  This  behavior  is  expected  because  in  all  these 
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cases,  the  clouds  are  tenuous  enough  (i.e.,  dipoles  are  weakly 
coupled),  and  do  not  contain  sufficient  numbers  of  dipoles  to 
exhibit  significant  extinction  of  energy  from  front  to  back  of 
the  clouds.  If  all  dipoles  were  of  resonant  length  and  were 
perfectly  decoupled,  we  would  observe  perfect  symmetry  of  the 
patterns;  our  dipoles  are  of  resonant  length  (making  each  one 
essentially  a single  mode  structure  with  a 180°  phase  shift 
upon  reflection  from  it,  i.e.,  all  diagonal  elements  of  the  Z 
matrix  are  essentially  pure  real),  but  they  are  not  decoupled, 
upsetting  the  symmetry  somewhat-  Sparsing  artificially  decouples 
many  elements  (95%,  99.4%  as  mentioned  earlier),  so  we  expect  the 
sparsed  results  to  closer  approach  the  ideal,  i.e.,  display  more 
symmetric  patterns  than  do  the  full  matrix  patterns.  Notice  that 
for  the  denser  clouds.  Figs.  23  and  24,  where  d/x  =0.5,  pattern 
symnetry  disappears  for  full  or  sparse  matrix  solutions.  Here, 
the  strong  coupling  definitely  upsets  the  symnetry  and  even  the 
artifice  of  decoupling  with  a 10%  rule  does  not  decouple  enough 
elements  (only  about  50%  as  mentioned  above)  to  regain  symmetry. 

A third  feature,  not  directly  observable  from  Figs.  25-41  but 
derivable  from  them,  is  the  effect  of  sparsing  upon  the  spatial 
average  backscatter.  Figure  42  presents  bar  graphs  of  average 
backscatter  obtained  from  each  of  10  different  clouds  with 
N = 30,  d/x  = 2.0,  each  calculated  using  full  matrices  and 
matrices  sparsed  by  the  10%  rule.  Clearly,  the  average  backscatter, 
even  with  the  full  matrix,  varies  from  cloud  to  cloud,  as  expected 
from  results  presentee  earlier,  but  the  error  incurred  by  using 
the  sparse  matrix  is  less  than  this  variance,  and  results  in  a value 
for  average  backscatter  which  is  slightly  too  high  in  most  cases 
by  a few  percent.  That  it  is  too  high  and  not  too  low  is  expected 
because  sparsing  results  in  a cloud  which  closer  approaches  the 
ideal  decoupled  cloud  and  our  results  have  shown  that  coupling 
lowers  the  average  echo  below  that  for  the  ideal.  Another  mode 
of  presenting  the  same  effect  of  sparsing  on  spatial  average  back- 
scatter is  shown  in  Figs.  43-45.  For  the  three  clouds  containing 
N = 200  dipoles,  the  cumulative  probabilities  P(a/x2)  of  back- 
scattering  cross  section  were  calculated.  The  solid  line  in  each 
figura  is  associated  with  the  sparse  matrix,  the  dots  with  the 
full  matrix,  and  the  crosses  with  the  ideal  decoupled  case  (calcu- 
lated from  P(a/x2)  = 1 - f.-a/30;  see  Appendix  I),  The  spatial  . 
averages  associated  with  the  three  algorithms  are  indicated  by 
the  vertical  lines.  Notice  that  all  three  mathematical  algorithms 
infer  that  the  backscattering  cross  section  exceeds  the  average 
cross  section  approximately  40%  of  the  time. 


Radius  of  "sphere  of  influence"  vs  average 
dipole  spacing, 


Figure  22 


Figure  26,  backscattering  patterns  as  calculated  using  the 
full  and  sparse  matrix,  cloud  #2,  d/X  = 2.0, 
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backscattering  patterns  as  calculated  using  the 
sparse  matrix,  cloud  #2,  N = 200,  d/x  =2.0. 
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e-e  backscattering  patterns  as  calculated  using  the 
full  matrix,  cloud  #3,  N = 200,  d/X  = 2.0. 
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Figure  42,  Spatial  average  backscatter  from  ten  different 
clouds  using  full  and  sparse  matrices;  the 
symbolism  L or  H indicates  that  the  sparse 
matrix  result  was  lower  or  higher,  respectively 
than  the  full  matrix  result  by  the  indicated 
percentage, 


5 % L 


SPARSE 

X X IDEAL  DECOUPLED 

Q © FULL 


FULL 


DECOUPLED 


Figure  43. 


Cumulative  probability  function  of  backscattering 
cross  section,  cloud  #1. 
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Figure  45,  Cumulative  probability  function  of  backscattering 
cross  section,  cloud  #3. 
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It  is  clear  from  what  has  been  said  previously  that  the 
sparse  matrix  incurs  substantial  savings  in  computer  memory. 

But  how  about  time  saved?  We  may  consider  the  time  consumed 
(on  the  ElectroScience  Laboratory  Datacraft  computer)  by  three 
separate  operations:  matrix  setup  time,  i.e.,  the  time  taken  to 
generate  the  Z matrix  (1ements;  reordering,  i.e.,  the  time  taken 
to  reorder  the  Z matrix  jo  that  its  auxiliary  matrix  will  also  be 
sparse;  and  backscattering,  i.e.,  the  time  taken  to  calculate  the 
backscattering  cross  section  at  one  look  angle. 


The  number  of  elements  in  large  matrices  rapidly  becomes 
exhorbitant,  even  taking  into  consideration  the  identity  of  all 
the  diagonal  elements  and  symmetry  about  the  diagonal.  Applying 
the  10%  rule  permits  us  to  store  only  a few  or  less  percent  of 
these  elements,  but  to  apply  the  rule,  all  of  them  must  be 
calculated.  This  takes  a great  deal  of  time.  In  order  to  reduce 
this  matrix  setup  time,  we  appealed  to  the  evidence  of  Fig.  22 
to  create  what  we  call  a "sphere-of-influence"  model.  In  this 
model  we  avoid  the  calculation  of  the  vast  majority  of  the 
matrix  elements  by  superimposing  on  the  10%  rule,  a sphere-of- 
influence  rule,  whereby  one  calculates  only  those  matrix  elements 
representing  the  coupling  of  the  dipole  of  interest  to  its 
neighbors  lying  within  a specified  spherical  volume  centered 
at  the  dipole,  all  other  couplings  being  assumed  zero.  Figure 
46  shows  the  computer  time  saved  by  applying  the  sphere  of 
influence  rule  as  well  as  the  10%  rule  over  the  time  taken  by 
applying  the  10%  rule  only.  It  is  based  upon  averages  of  20 
clouds  of  100  dipoles  each,  and  shows  the  time  saved  for 
assumed  sphere  of  influence  radii  from  2.07a  to  2.5A.  The 
larger  Jie  sphere-of-influence,  the  smaller  the  time  savings, 
of  course.  But  the  larger  the  sphere  of  influence,  the  more 
identical  become  the  matrices  sparsed  by  the  two  different  rules. 
The  number  of  elements  which  differ  in  the  two  matrices  so  sparsed, 
are  presented  in  Fig.  46  as  the  percentage  of  the  N2  elements  in 
each  matrix.  Clearly,  at  about  a radius  of  2.4  , the  two  become 
identical,  implying  that  the  sphere-of-influence  sparse  model 
should  yield  backscattering  patterns  equally  as  good  as  those 
obtained  from  the  10%  sparse  model.  Note  that  our  average  spacing 
of  d/x  = 1.0  is  assumed  for  the  clouds.  Denser  clouds  would 
exhibit  less  time  saving.  Figure  47,  also  for  fixed  d/A  = 1.0, 
indicates  the  time  saving  for  a variety  of  choices  of  N,  using 
2.07A  and  2.5a  radii  for  the  sphere  of  influence.  As  expected, 
the  time  saving  rises  as  N increases. 
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Time  saving  and  element  error  vs  sphere  of 
influence  radius  using  sphere  of  influence 
model  plus  10%  rule  over  the  10%  rule  alone 


The  foreging  data  reflect  a very  substantial  time  saving  in 
matrix  setup  time  with  little  penalty  in  echo  area.  Evidence  did 
eAist,  however,  that  the  sparse  matrix  algorithm,  even  with  the 
sphere  of-influence  rule  built  in,  was  time  consuming.  This 
evidence  was  verified  when  a computation  of  an  N = 500  diprle 
cloud  with  d/A  = 1.0  the  Wright-Patterson  Air  Force  Base 
CDC  6600  computer  overran  its  alloted  time  of  5000  seconds.  In 
order  to  investigate  this  time  consumption  more  carefully  on 
our  own  machine,  a set  of  backscatter  data  were  accumulated  for 
one  look  angle  with  clouds  of  30,  50,  and  100  dipoles,  each  with 
average  spacings  of  d/A  = 0.5  and  1.0.  Twenty  such  clouds  were 
considered  ^or  each  case  and  average  times  obtained  for  *he  three 
parts  of  the  sparse  matrix  program.  The  sphere-of-influence 
plus  10%  rules  were  applied  to  sparse  each  matr'x  and  the  results 
tabulated  in  Table  E.  The  numbers  do  not  represent  real  times 
but  clock  times  on  the  ESL  machine.  Time  ratios  are  of 
importance  here. 


TABLE  5 

CLOCK  TIMES  OF  THREE  PARTS  OF  SPARSE  MATRIX  ROUTINE 


d/A 

N 

No.  of  non- 
zero elements 

Matri x 
Setup 

Reorderi nq 

1 look 
angle 

Total  time 

1.0 

30 

76 

842 

475 

17 

1 ,350 

1.0 

50 

V* 

1,863 

1,884 

31 

3,743 

1.0 

100 

343 

5,033 

17,410 

76 

22,534 

0.5 

30 

220 

1,117 

2,807 

30 

3,968 

0.5 

50 

500 

3,069 

21 ,277 

66 

24,449 

0.5 

100 

1,462 

11,311 

414,121 

219 

425,667 

In  this  table  total  time  is  the  sum  of  tne  previous  three  operations 
plus  some  small  amount  for  inherent  operations.  The  average  number 
of  nonzero  elements  in  the  upper  right  triangle  of  the  Z matrix 
are  also  given.  Clearly,  with  the  sphere-of-influence  rule 
applied,  it  is  the  reordering  time  which  is  preponderant  and  causes 
the  sparse  matrix  algorithm  to  be  so  time  consuming.  In  an  effort 
to  reduce  this  reordering,  an  attempt  was  made  to  partially 
reorder.  The  results,  however,  were  not  encouraging  and  the 
effort  was  terminated. 

The  sparse  matrix  computer  program  used  to  obtain  the  fore- 
going results  is  documented  in  Appendix  E. 
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Before  turning  to  another  topic  we  should  point  out  one  facet 
of  the  sparse  matrix  approximation  as  arrived  at  by  the  10$  and 
sphere-of-influence  rule.  That  is,  these  sparsing  techniques 
are  determined  by  the  Z matrix  alone;  they  do  not  take  into  con- 
sideration the  currents  induced  on  the  dipoles.  For  example,  the 
influence  of  the  ith  dipole  current  upon  the  voltage  induced  in 
the  jth  dipole  is  proportional  to  z-jjlj,  the  product  of  the 
ijth  matrix  element  and  the  ith  current.  Simply  setting  z-j j to 
zero  if  it  is  smaller  than  10%  of  Zjj  may  not  be  rigorously  ap- 
propriate if  I-j  is  large.  However,  the  10%  rule  appears  to  do  a 
satisfactory  job  for  obtaining  the  average  backscatter.  If,  how- 
ever, one  is  interested  in  extinction  of  current  through  the 
cloud,  the  10%  rule  or,  even  worse,  the  sphere-of-influence  model, 
cannot  be  expected  to  yield  good  rtc  'ts  for,  hy  their  nature, 
these  approximations  modify  the  coherent  forward  scaLte»°d  wave 
as  it  proceeds  through  the  cloud.  Since  this  is  an  important 
phenomenon  dictating  the  extinction  rate  in  the  first  few  wave- 
lengths into  the  cloud,  a better  model  would  have  to  be  devised  if 
one  is  interested  in  extinction.  The  indirect  methods  described 
below  might  serve  such  a purpose. 

4.  Indirect  (Iterative)  Methods 
a.  Theoretical  Considerations 

Sections  2 and  3 have  discussed  direct  and  sparse  matrix 
methods  for  solving  the  equation. 


(12a)  ZI  = V . 


In  this  section  we  discuss  indirect  methods,  of  which  linear 
iteration  forms  a special  class  and  which  we  will  emphasize. 

In  order  to  avoid  ambiguity  in  notation,  in  this  section  we 
will  rewrite  Eq.  (12a)  as 

(12b)  Ax  = b 

and  develop  all  pertinent  equations  in  terms  of  A,  x,  and  b 
rather  than  Z,  I,  and  V. 

All  indirect  methods  of  solving  Eq.  (12b)  for  x can  be  viewed 
from  the  implicit  formulation  given  by 

(13)  x = f(A,b(jx)  , 
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implicitness  being  characterized  by  the  appearance  of  unknown  vector 
x on  both  sides.  The  symbol  f in  the  above  expression  represents  a 
function  o^  set  of  rules  (algorithm)  with  the  minimal  property  that 
the  exact  x satisfies  Eq.  (13)  identically.  One  additional  con- 
dition on  f needed  here  is  that  it  be  able  to  transform  an  ap- 
proximation to  x into  an  improved  approximation.  It  would  be  too 
much  to  ask  that  one  application  of  Eq.  (13)  yield  the  exact 
solution.  However,  repeated  applications  might,  be  expected  to 
give  successively  better  approximations  and  this  is  precisely 
the  essence  of  iteration.  Notation  can  be  added  to  the  implicit 
form  of  Eq.  (13)  to  give  a general  formula  for  iteration,  i.e., 


x<k>  - f<k>(A.b,x(k-1).x<k-2> x<k-"'>). 


Note, 


where  x^  represents  the  k^  iterate  or  approximation  of  x.  Not 
in  this  form,  x(k)  is  considered  to  be  related  to  m previous 
iterates,  in  which  case  the  iteration  is  of  m+h  deg re".  Also 
note  that,  in  general,  the  function  f(k)  can  change  from  step 
to  step.  If  f(k)  remains  invariant  throughout  the  iteration 
process  (k  = 1,2,.**)»  then  the  iteration  is  called  stationary 
and  if  not,  it  is  called  non-stptionarv.  The  iteration  process 
is  referred  to  as  linear  for  f(*0's  which  are  linear  functions 
of  x(k-l),  x(k"2),  ...,x(k-m)  and  nonl i near  otherwise.  Iterative 
methods  subdivide  still  further  into  point-step  and  group  or 


block-step  methods  and  these  categories  depend  on  the  choice  of 
f(k),  More  specifically,  the  point-step  methods  proceed  to 
improve  the  individual  components  of  solution  vector  x(k)  one- 
at-a-time,  independently  of  the  other  elements,  while  block-step 
methods  normally  improve  blocks  of  elements  of  x(k),  inde- 
pendently of  other  blocks.  A rather  unique  block  type  itera- 
tive method  will  be  introduced  later  which  will  allow  "overlap" 
of  these  blocks  based  on  the  physical  scattering  problem. 

Disussed  in  this  section  are  three  classical  linear  stationary 
methods  of  first  degree;  the  Point-Jacobi  (J)  method,  the  Gauss- 
Seidal  (GS)  method  and  the  method  of  Successive  Over-relaxation 
(SOR)  together  with  their  physical  interpretation  from  the 
scattering  viewpoint.  Also  included  is  a discussion  of  convergence 
criteria  for  these  methods  and  finally  a presentation  of  results, 
mostly  calculated  using  SOR. 

Linear  First  Degree  Methods  (J,GS,  SOR) 

The  basic  equation  underlying  many  linear  indirect  methods 
is  derived  from  Eq.  (12b)  by  adding  x to  both  sides  and  re- 
arranging to  give 


x = (I-A)  x b, 


f 

v. 


i 0 


which,  in  terms  of  a sequence  of  iterates  can  be  written  as 


x(k)  = Hx^k-1^  + b, 


where 


H = I - A . 


H is  usually  referred  to  as  the  iteration  or  error  reducing 
matrix  and  is  related  to  the  functions  f(k)  described  in  the  pre- 


vious section.  Iteration  via  Eq.  (16)  is  linear,  stationary 
and  of  first  degree.  This  expression  yields  a number  of  clas- 
sical techniques  which  differ  by  the  "splitting"  of  matrix  A. 
Consider  the  splitting  defined  by 


A = D - F.  - F 


where  D = [a-fi],  i = 1,  is  a diagonal  matrix  and  E=[-aij], 
i>j,  is  strictly  lower  triangular  and  F=[-a,-^],  i<j,  is  strictly 
upper  triangular.  The  iteration  of  Eq.  (16;  then  becomes 


x^  = D”1  (E+F)x^k_1  ^ ^ D’]b  , 


where  the  iteration  matrix  is  identified  as 


Hj  = D_1 (E+F) 


Equation  (19)  describes  the  well  known  Point-Jacobi  (J)  method 
[48]  or  method  of  "simultaneous  displacements"  [49].  Here, 
new  components  of  x(k)  are  computed  as  functions  of  components  of 
xvk-1)  as  follows: 


f(k)  = - 


l + 

j=l  1J  J aii 


Note  however,  that  by  carefully  considering  the  ordering  of  im- 
provements in  x^k)  Eq.  (21)  can  be  modified  to  incorporate  the 
latest  improvements  in  xOO  at  intermediate  steps;  i.e., 


MJUJMMUPI 


V*  - r"*  ‘ 

. • _ ...  ...  - - , 


(22) 


t(k)  = . JL 


1 1 


I i*1 

I 

U=i 


aijxj 


(k) 


N 

I 

j=i+l 


a x(k-1} 
aijXj 


aii 


bi 


or,  in  matrix  notation, 

(23)  x<k>  = (D-E)_1F  x(k)  + (D-E)']b  . 


Here,  the  iteration  matrix  is  given  by 

(24)  Hg$  = (D-E)-1 F . 


Equation  (23)  is  the  familiar  Gauss-Seidel  (GS)  method  [50], 
also  known  as  the  method  of  "successive  displacements". 

Both  the  J and  the  GS  techniques  can  be  considered  special 
cases  of  a larger  class  of  computer  oriented  "relaxation"  methods 
often  referred  to  as  Over-relaxation  (OR)  methods  [51].  A basic 
equation  governing  these  methods  is  given  by 


(25) 


x<k>  - x<k-» 


+ U)  (x 


(k) 


-x<w>> 


where  the  "relaxation  factor"  is  usually  chosen  to  be  a real 
constant  in  the  range  0<w<2  and  x(k)  is  computed  by  either  the 
J or  the  GS  method  [52].  The  technique  for  computing  x(k)  is 
clearly  not  restricted  to  the  above  two  methods;  here,  however, 
only  the  GS  method  will  be  assumed.  This  assumpiton  leads  to 
the  defining  equation  for  the  familiar  Successive  Over-relaxa- 
tion (SOR)  method  [53];  namely, 

(26)  x(k)  = (I-a)D‘'1E)"1[(l-u))I-a)D"1F]x(k"1)+(I-tl)D‘1E)'1wD"1b, 
where  the  iteration  or  error  reducing  matrix  H is  given  by 

(27)  H = (I-ijD"1E)‘1[(l-w)I-u)D"1F]. 

0) 

The  computational  procedure  for  SOR  is  given  by  Eqs.  (22)  and 

(25)  and  therefore,  for  co=l , SOR  reduces  identically  to  the  GS 
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method.  Incidentally,  when  the  solution  x^  in  Eq.  (25)  is 
computed  by  the  J method,  the  resulting  technique  is  called 
the  method  of  "simultaneous  over-relaxation"  ( JOR)  [54]  and 
reduces  directly  to  the  J method  for  w=l . 

The  SOR  method  of  Eq.  (26)  is  obviously  a stationary  linear 
method  of  first  uegree.  Nevertheless,  SOR  can  be  made  non- 
stationary by  not  restricting  o>  to  being  a constant  for  all 
iterations.  It  is  not,  on  the  other  hand,  clear  how  w should 
be  varied  to  improve  the  speed  of  the  iteration  procedure  (con- 
vergence) for  the  general  case.  More  will  be  said  of  this 
subject  in  a later  discussion  on  convergence. 

An  alternative  form  for  these  same  iteration  procedures  can 
be  derived  in  terms  of  an  approximate  or  psuedo  inverse  to 
matrix  A,  Let  represent  an  approximation  to  the  inverse 
A/!  ^q*  ^3).  Then*  the  kth  iterate  x(k)  can  be  written  as 

x(k— I ) pius  a correction  term  d(k“''  given  by 


(28)  d<k-'>  -V 

where  the  residual  vector  r^k~^  is  defined  by 

(29)  r^k'1}  » b - Ax(k_1). 


Equations  (28)  and  (29)  can  be  combined  to  give 

(30)  d(k_1)  = -a’1  A x(k_1)  + A^b, 
whereupon,  the  kth  iterate  may  be  written  as 

(31)  x(k)  = (I-A“1A)x(k_1)  + A_1b  . 

The  H matrix  here  has  the  form 

(32)  H = (I-A-1A) 

and  it  is  easily  shown  that  the  following  choices  for  A lead  to 
the  previously  derived  H matrices;  i.e.. 


(33)  A = D - Eq.  20  (J) 

(34)  A = D-E  -*•  Eq.  24  (GS) 

(35)  A = i D-E  ■>  Eq.  27  (SOR). 


An  additional  point  to  be  noted  in  this  latest  discussion  is 
that  A need  not  be  identified  with  a rigorous  matrix  form  such 
as  those  given  in  Eqs.  (33)  to  (35).  A can  merely  be  repre- 
sentative of  a special  algorithm  for  computing  the  approxi- 
mations to  x.  Equation  (31)  in  this  case  will  no  longer  repre- 
sent a rigorous  matrix  equation.  This  is  in  line  with  the  pre- 
vious comment  that  f in  Eq.  (13)  may  in  fact  represent  only  a 
set  of  rules  or  algorithm  for  computation.  More  will  be  said 
later  concerning  a less-than-rigorous  notation. 

Convergence  Criteria 

Success  or  failure  o*  any  iterative  method  is  measured  in 
terms  of  the  limit  of  the  sequence  <x(k)>  as  k->°°;  i.e.,  if  x(k) 
reaches  the  exact  solution  x in  the  limit,  then  the  method  is 
obviously  successful  and  if  not,  the  method  fails.  Although 
seeemingly  straightforward,  certain  questions  remain  unanswered. 
Namely,  is  information  available  to  indicate,  a priori,  when  a 
particular  method  will  converge  and,  if  so,  what  quantitative 
measures  can  be  counted  on  to  indicate  sufficient  convergence 
since  the  exact  solution  is  never  known?  The  first  question  is 
answered  rather  easily  which  the  following  paragraphs  will  show. 
The  second  question  however  turns  out  to  be  the  more  practical 
yet  difficult  question  to  answer.  Reasons  for  this  will  be 
made  clearer  in  the  final  portions  of  this  section. 

The  normed  vector  'pace  defined  in  Appendix  C of  Ref.  38 
can  be  reintroduced  here  in  terms  of  the  limit  of  the  sequence 
<x(k)>  in  the  following  way, 

(36)  lim  | ]x-x^  ||=0, 
k-*» 


where  x is  the  exact  solution  satisfying  Eq.  (16)  identically; 
i.e.. 


(37) 


x = Hx  + b . 


The  following  result  is  obtained  by  considering  the  difference 
between  Eqs.  (37)  and  (16), 

(38)  (x-x(k))  = H(x-x(k~1}) 


and  can  be  taken  recursively  to  yield 

(39)  (x-x^k^ ) = Hk(x-x^). 

Note  here  that  x^  is  the  initial  "guess"  corresponding  to  k=0, 
hence,  (x-x(^))  is  a constant  vector.  Compatible  norms  (see 
Appendix  C of  Ref.  38)  are  needed  on  both  sides  of  Eq.  (39) 
to  give 

(40)  ||x-x<k>||  < | |H| |k  ||x-x(0)||  . 

k k 

where  the  inequality  | |H  ||  £ ||H||  has  been  included  in  bring- 
ing this  expression  to  the  form  of  Eq.  (40).  Recall.  Eq.  (36) 
defines  the  unique  condition  for  convergence  of  <x(k)>  in  the 
established  normed  space  and  by  applying  this  condition  to 
Eq.  (40),  the  necessary  and  sufficient  condition  for  conver- 
gence of  Eq.  (16)  becomes 

(41)  lim  ||H||k  = 0, 
k-*» 


and  this  condition  can  only  be  satisfied  if 

(42)  | |H | | < 1 

Hence,  the  properties  of  H determine  convergence  characteristics 
of  Eq.  (16)  for  any  starting  vector  x(0).  The  natural  norm  of 
Eq.  (42)  remains  as  yet  unspecified  but  has  a lower  bound  (see 
Appendix  F o'  Ref.  38)  in  the  spectral  radius  given  by 


(43)  | |H | I > p{H} 


where  the  spectral  radius  of  H,  p{H},  is  defined  by 


(44)  p{H>  = max  lx., 
• 1 
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and  the  x/s  are  solutions  to  the  determinantal  eigenequation, 


’Jka 


det(H-Xl)  = 0, 


Therefore,  the  necessary  and  sufficient  condition  for  convergence 
of  Eq.  (16)  to  the  solution  x (see  Appendix  6 of  Ref.  38  for  this 
proof)  is  given  by 


p { H } < 1 , 


Convergence  properties  for  the  iterative  methods  outlined 
earlier  can  be  predetermined  as  the  above  procedure  indicates; 
however,  for  certain  special  cases,  calculation  of  eigenvalues 
can  be  avoided.  This  would  certainly  be  an  advantage,  especially 
for  those  cases  when  the  order  of  matrix  H is  large  (e.g., 

N>100).  These  special  cases  can  be  recognized  in  terms  of  the 
following  properties  [55]  of  the  original  matrix  A and  the  split- 
ting of  A defined  in  Eq.  (18): 


1 .  If 

E + F > 0, 


D > 0 


p{D~  (E  + F)}  < 1 


then  A is  an  M-matrix. 


2,  If 


i D_1 (E+F) 


then  A is  strictly  diagonally  dominant. 


3.  If  no  NxN  permutation  matrix  P which  permutes  rows 
and  columns  of  an  NxN  matrix  exists  such  that 


PAPT  = 


D1  G 


0 0, 


, (T  denotes  transpose) 


where  D-j , D£  are  square  matrices  and 


,'y«  ^ , • .»  ^ 


i 


t 


LM 


I 
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| |D_1(E  + F)||_<1  . 

then  A is  irreducibly  diagonally  dominant. 

4.  A has  the  following  properties; 

A is  hermitian  (A  = A*)  and  (*  denotes  complex  conjugate 
transpose) 

A is  positive  definite  (eigenvalues  of  A are 

» i = 1,2,*--,N  and  satisfy  > 0,  for  all  i. 

The  convergence  of  the  J and  GS  methods  is  assured  for  any 
matrices  satisfying  1 , 2 or  3 above  and  the  SOR  method  neces- 
sarily converges  for  O^tix  2 when  condition  4 is  met.  Proofs  of 
these  sufficient  conditions  for  convergence  are  given  in  Varga  [56]. 
If,  in  addition  to  condition  4,  A has  "property  A"  as  originally 
defined  by  Young  [57],  then  an  optimum  relaxation  factor ow- 
can  be  computed  for  the  SOR  method.  This  optimum  factor  isK 
given  by 


(47)  to  . = — ± 

v ' opt  i 

1 +J1-V 

where 


(48)  v = P { Hj } 

and  Hj  is  computed  from  Eq.  (20).  If,  on  the  other  hand,  A 
does  not  satisfy  "property  A",  then  to  . can  only  be  determined 
empirically.  opt 

The  discussion  of  convergence,  so  far,  has  centered  on  finding 
the  spectral  radii  of  appropriate  iteration  matrices  or  on  the 
special  properties  of  the  original  matrix  A.  Consider,  how- 
ever, the  more  general  matrices  which  appear  in  the  EM  prob- 
lems studied  here.  The  A matrices  in  these  cases  are  complex 
symmetric  (nonhermitian)  and  not  diagonally  dominant  in  all  but 
the  most  trivial  cases.  They  are  positive  definite,  or  at  least 
positive  semi-definite,  in  the  sense  that 


(49)  Re(x*Ax}  >_ 0 (*denotes  complex  conjugate  transpose), 
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where  this  quantity  is  related  to  real  power  dissipated  (radiated) 
fay  the  system  represented  by  impedance  matrix  A.  These  basic 
characteristics  of  the  EM  problem  eliminate  any  possibility  of 
satisfying  conditions  1-4  above.  Therefore,  the  only  rigorous 
technique  is  to  compute  the  appropriate  spectral  radius,  but 
some  difficulty  in  computing  p{H}  is  likely  to  be  encountered  for 
many  practical  EM  problems  due  to  the  size  of  N.  General  sub- 
routines are  available  [58]  for  calculating  complex  eigenvalues  of 
complex  matrices;  however,  when  N becomes  large  (>250),  these 
routines  will  require  more  fast-access  memory  than  available  on 
most  computing  machines.  Even  if  these  computations  are  pos- 
sible, the  authors  suggest  that  the  time  and  effort  used  in 
searching  for  a "largest"  eigenvalue  would  better  be  used  trying 
the  iterative  technique. 

A suitable  measure  of  convergence  characteristics  usually 
must  be  determined  empirically.  One  natural  choice  is  a meas- 
ure based  on  the  vector  of  residuals  defined  by  Eq.  (29),  or 

(50)  r(k)  = b - Ax^k) 


(k) 

This  expression  can  be  misleading  since  it  states  that  if  rv  -0, 
the  x(k)  is^  the  exact  solution  and  this  is  correct.  However, 
to  assume  that  x(*0  is  near  the  exact  solution  when  r(k)  is 
small  (but  not  zero)  may  be  a gross  overassumption.  A hint  of 
this  specious  behavior  is  given  by  the  following  bound  on  the 
relative  error  in  x(*0, 


(51) 


x-x 


(k) 


,00 


- b 


Cond{A) 


Clearly,  the  ratio|  |r^  [ |/|  |b|  | must  be  considered  in  light  cf 
the  condition  number  of  A and  the  possible  effects  it  may  have 
on  the  upper  bound  of  Eq.  (51).  It  is  also  important  to  point 
out  that  all  norms  of  residuals  defined  by  Eq.  (50)  do  not 
necessarily  decrease  monotonically  when  the  iteration  process 
is  convergent;  i.e.,  they  sometimes  oscillate  or  increase.  Even 
then,  Eq.  (51)  implies  that  if  a monotonically  decreasing  norm 
found,  it  may  still  be  mere  speculation  to  assume  x(kJ  is 
in  some  sense  approaching  the  correct  solution.  Still  another 
measure  of  convergence  is  to  consider  a norm  of  the  change  in 
x(k),  from  one  iteration  to  the  next.  Consider  the  following 
lormed  difference. 
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(52)  | |6x(k) | | = ||x(k)  - x(k_1)|| 


and  ask  the  following  question: 

Does  there  exist  a value  of  k,  say  kro,  and  some  e > 0 

such  that  for  k > k^,  1 1 6x v ^ | | < e? 

If  so,  the  process  can  be  said  to  converge.  The  particular 
choice  of  e used  to  indicate  sufficient  convergence,  however, 
is  critical  since  the  normed  difference  given  by  Eq.  (52)  is 
not  necessarily  a monotonically  decreasing  measure,  even  if  the 
solution  is  convergent. 

A last  comment  is  in  order  before  proceeding.  Certainly, 
the  most  reassuring  indication  of  convergence  would  be  to  compare 
solutions  obtained  by  different  techniques  and  possibly  even  by 
a physical  measurement  and  find  that  they  agree.  This  type  of 
comparison  should  obviously  be  sought  wherever  possible  and 
this  was  indeed  the  case  in  this  study.  In  a following  section 
we  present  certain  confirmed  iterative  results  and  these  results 
are  used  to  justify  the  choice  of  error  measure  used  for  reliably 
indicating  convergence. 

Physical  Interpretation  of  the  Jacobi  and 

Gauss-Seidel  Methods 

A physical  interpretation  of  the  J and  GS  methods  is  pre- 
sented here  with  the  aid  of  Fig.  48.  The  A matrix  of  previous 
equations  here  represents  the  5x5  impedance  matrix  corresponding 
to  the  5 dipoles  shown  in  the  figure.  Consider  the  initial  ex- 
citation on  each  dipole  to  be  the  incident  field  and  the  initial 
current  vector  to  be  x(0)  = 0. 

(kl 

The  J method  in  general  computes  xv  ' by  considering  the 
incident  field  and  the  scattered  fields  produced  by  x(k~'),  The 
latter  contribution  is  zero  for  k = 1,  hence  the  J method  cal- 
culates x”'  corresponding  to  the  "uncoupled"  array.  The  J 
method  improves  the  solution  for  k > 1 by  accounting  for  the 
incident  field  and  the  scattered  fields  at  each  dipole  where 
the  scattered  fields  are  produced  by  "old"  currents.  This 
interpretation  of  the  J method  in  terms  of  multiple  scattering 
within  the  array  was  first  described  by  Tai  [59].  All  elements 
of  the  solution  vector  are  updated  simultaneously  at  the  end  of 
each  iteration,  hence  the  name  "method  of  simultaneous  dis- 
placements". 
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Figure  48.  Sample  random  array  for  Jacobi  and  Gauss-Seidel 
iteration  methods. 


The  GS  method  uses  the  "latest"  currents  whenever  possible, 
i.e.,  the  initial  current  on  element  #1  due  to  the  incident  field 
is 


(53) 


,(o)  „ 


‘n 


the  initial  current  cn  element  #2  due  to  the  incident  field  plus 
the  scattered  field  from  element  #1  is 


(54) 


,(0)  . 


(bo  + 3oiX-j  )/3ooi 
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the  initial  current  on  element  #3  is  due  to  the  incident  field 
plus  the  scattered  fields  from  elements  #1  and  #2 


(5-3/  *3  ■ (b3  + a3]x{  ^ + a32x2°^a33' 
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etc.  The  name  "method  of  successive  displacements"  clearly  ap- 
plies to  the  above  description  and,  as  we  might  expect,  the  GS 
method  has  superior  convergence  properties  since  it  accounts  for 


n 

I 

i=l 


interactions  per  iteration  whereas  the  J method  only  accounts  for 
n interactions  per  iteration. 


The  SOR  method  operates  on  the  GS  iterates  by  "relaxing"  the 
latest  correction  through  a weighted  averaging  process.  Note  that, 
even  though  SOR  degenerates  to  GS  for  u>=l , convergence  of  SOR  (u^l ) 
can  be  relatively  good  while  GS  may  not  converge  at  all.  Physical 
interpretation  of  SOR  in  terms  of  scattering  is  more  difficult  than 
for  J or  GS.  Weighted  averaging  of  currents  seems  to  be  a purely 
mathematical  concept.  However,  by  assuming  the  array  to  be  im- 
mersed in  a medium  which  modifies  the  multiply  scattered  fields 
either  by  introducing  "loss"  or  "gain" , this  would  cause  cor- 
responding reductions  or  increases  in  interactions  between  dipoles. 
The  application  of  an  iterative  procedure  (e.g.,  GS)  under  these 
"relaxation"  conditions  could  also  be  termed  a form  of  SOR.  The  loss 
or  gain  in  this  case  could  either  be  reduced  as  the  iteration  con- 
verged or  left  in  if  the  convergence  required  it.  The  solution  to 
a "lossy"  problem  might  be  of  considerable  value  in  certain  cases, 
especially  if  the  "lossless"  case  could  be  deduced  from  such  a 
solution. 


Sphere  of  Influence  (SOI)  Method 


The  SOI  technique  is  an  empirically  derived  concept 
based  on  the  electromagnetic  scattering  viewpoint.  The  approach 
stems  directly  from  the  array  problem  where  the  overall  scatterer 
is  so  large  and  intricately  detailed  that  it  produces  a matrix 
problem  too  large  to  handle  by  direct  methods.  Hence,  the  larger 
problem  is  broken  up  into  a reasonable  number  of  smaller  problems 
each  of  which  can  be  solved  directly.  The  heart  of  the  method  lies 
in  the  hope  that  the  solution  to  the  large  case  can  be  obtained  by 
interacting  these  smaller  solutions  with  one  another  through  an 
iterative  process.  The  idea  of  "influence"  manifests  itself  as  a 
mutual  impedance  or  coupling  criterion  between  dipoles  as  in  the 
case  of  the  random  array.  Distance  between  dipoles  provides  a 
natural  means  for  determining  gross  effects  between  dipoles  and 
relative  orientation  is  another.  When  these  criteria  fail  to  give 
a precise  decision  rule,  a comparison  of  the'Tnutual  impedance  to  a 
preset  level  can  be  made.  The  level  or  threshold  used  here  is 
defined  to  be  a prescribed  fraction  of  the  diagonal  or  self  im- 
pedance term.  This  criterion  is  also  similar  to  that  used  in  the 
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sparse  matrix  approximation  for  the  scattering  problem.  Recall, 
the  sparse  matrix  approach  attempts  to  "thin"  the  matrix  by  deciding 
which  elements  are  less  important  (i.e.,  below  a certain  magnitude) 
and  a special  algorithm  is  used  to  solve  the  thinned  matrix 
problem  exactly.  This,  however,  is  not  the  solution  to  the  original 
problem  and  it  is  for  this  reason  that  iteration  may  provide  the 
only  means  for  finding  the  exact  solution  to  the  original  problem 
for  these  large  cases. 

The  oasic  SOI  method  computes  groups  of  closest  coupled  neighbors 
and  uses  these  "overlapping"  groups  to  form  a sequence  of  N reduced 
iteration  submatrices.  Closeness  is  measured  by  the  relative  in- 
fluence between  dipoles  using  the  a priori  criterion  mentioned  above. 
The  N iteration  submatrices  will  in  general  be  distinct  and  the  jth 
submatrix  will  be  used  to  compute  only  the  current  on  the  jth  dipole 
(point-step).  The  N subsystems  formed  by  these  submatrices  are  each 
solved  by  a direct  technique  and  the  scattered  tangential  electric 
fields  are  computed  after  each  iteration  and  compared  to  the  in- 
cident tangential  electric  fields  as  a check  on  the  zero  tangential 
electric  field  boundary  condition  along  each  dipole.  The  same 
residual  mode  voltage  column  rv*)  of  Eq.  (50)  is  proportional  to  the 
total  tangential  electric  fields  and  is  used  as  the  excitation  column 
for  the  next  iteration  if  boundary  conditions  are  not  sufficiently 
met.  The  process  is  continued  until | | r(k) | | is  reduced  to  an  accept- 
able level . 

One  possible  formulation  for  SOI  is  given  in  the  following 
equations  with  the  understanding  that  the  overall  technique  cannot 
be  simply  described  by  a single  matrix  equation  as  with  the  other 
methods  mentioned  thus  far.  Let  A ( m j i m j ) represent  the  mj  x mj 
iteration  submatrix  containing  self  and  mutual  impedances  for  the 
jth  dipole  and  its  mj-1  most  closely  coupled  neighbors.  The  .members 
of  this  jth  subsystem  (submatrix)  are  obtained  by  applying  the 
following  condition  to  the  jth  row  of  A, 


p = 1,2,- 

P t j , 


where  c is  a prescribed  (empirical)  real  constant  in  the  range 
0 < c < 1.  The  jth  subsystem  at  the  kth  step  of  the  iteration 
process  is  then  given  by 

(57)  A(mj  [rtij)  d^  (rrij ) = r^k“'I'(mj) 


when  r(k*1)(!ni)  is  the  ,ms  x 1 "subvector"  of  residuals  on  the  jth 
group  of  dipoles  and  d(H(mj)  is  a mj  x 1 subvector  which  includes 
the  kth  correction  to  the  current  on  dipole  j,  i.e., 

(58)  - x‘W>  ♦ dS«  • 

The  kth  iteration  is  complete  after  N subsystems  of  the  form  Eq.  (57) 
(i=l  2.....N)  have  been  solved  and  all  corrections  13=1  ,Z,« • • ,NJ 
of  the  form  E.  (58)  have  been  made.  A new  residual  is  obtained 
again  by  including  the  original  A matrix  and  b vector  in  Eq.  IbU}. 

Consider  a simple  application  of  SOI  to  the  5 dipole  array 
illustrated  in  Fig.  49.  The  region  ("sphere  ) of  influence  around 
dipole  #1  (j=l)  is  shown  figuratively  as  a circle  about  dipole  #1. 
Recall,  this  circle  actually  represents  the  region  of  influence  for 
which  Eq.  (56)  is  satisfied  for  j=l  for  the  given  value  for  c.  The 
matrix  equation  for  this  subset  will  be  of  order  mi -3  and  for  the 
kth  iteration  this  equation  takes  the  form 
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Direct  solution  of  this  subsystem  yields  subvector  d^  f™m  which 
the  kth  correction  to  xj  ’ is  obtained,  i.e., 

(60)  x<k>  • 

Some  experience  is  necessary  in  choosing  constant  c in  order  that 
the  maximum  of  mj  defined  by 

(61 ) max  m-  = M 

j J 

remains  within  the  capacity  of  the  machine  and  yet  still  yields  a 
convergent  solution.  The  two  extreme  choices  for  c are  c = 0 and 
c = 1.  All  submatrices  corresponding  to  the  choice  c-0  are  iden- 
tically equal  to  the  original  A matrix  and  the  first  subsystem 
therefore  yields  a total  solution  for  x with  one  application  of 
the  direct  method,  assuming  of  course  the  computer  can  do  this. 


y • *M  - •• 


The  c=l  choice  causes  SOI  to  degenerate  to  the  J method  since  only 
the  diagonal  terms  are  inverted  in  this  case. 

A potentially  important  modification  to  the  SOI  method  is 
the  inclusion  of  a "forward  scatter"  (FS)  model.  Consider  the 
dipoles  which  are  located  on  the  far  side  of  a very  large  and  dense 
array.  These  dipoles  are  very  likely  to  be  shadowed  by  those  located 
on  the  directly  illuminated  side  of  the  array.  Hence,  an  improved 
"region  of  influence"  for  dipoles  deep  inside  the  array  (or  on  the 
back  side)  could  be  obtained  by  taking  into  account  the  well  known 
coherent  forward  scatter  phenomenon  which  occurs  along  the  line- 
of -sight.  The  reasoning  here  is  that  as  the  incident  wave  passes 
over  these  resonant  dipoles  (up  front),  the  rescattered  fields  in 
the  forward  direction  are  nearly  of  opposite  phase  tc  the  progressing 
incident  wave  and  as  this  incident  wave  moves  farther  into  the  array, 
these  coherently  rescattered  fields  begin  to  "buck  out"  the  incident 
wave.  This  eventually  produce?  a shadowing  effect  on  dipoles  in  the 
deep  interior  and  far  side  regions  of  the  array. 

The  above  concepts  of  FS  are  rather  simple  to  grasp;  however, 
implementation  of  FS  into  the  SOI  algorithm  is  relatively  messy. 

The  FS  process  entails  checking  all  a-jjx(k)  products  which  occur 
on  or  near  the  1 ine-of-sight  aspect  through  the  array  to  the  ith 
dipole.  The  "up  stream"  jth  dipoles  with  scatter  products  which 
satisfy 

(62)  ir/2  < arg{a  M < 3tt/2 

• J J 

are  then  chosen  to  be  included  in  the  next  (k+1)  subsystem  (sub- 
matrix) for  calculating  the  current  on  dipole  i.  The  newly 
modified  SOI-FS  method  is  nonstationary  since  the  N submatrices 
will  no  longer  be  constants  for  the  whole  process.  They  will  of 
course  become  more  constant  as  x(k)  nears  a constant  solution; 
however,  in  general,  these  submatrices  will  be  quite  changeable 
in  the  early  stages  of  the  iteration.  Also  note  that,  the  re- 
sulting subsystems  will  be  larger  than  for  SOI  alone  for  a given 
constant  c and  hence,  implementing  FS  into  SOI  will  generally 
require  different  values  for  c in  order  to  maintain  M in  the 
viable  range  for  direct  solutions.  The  addition  of  FS  should, 
however,  improve  convergence  of  SOI  and  thereby  allow  an  in- 
crease in  c in  order  to  make  room  for  the  new  dipoles  added  in 
by  FS. 
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Figure  49.  Sample  random  array  for  Sphere  of  Influence 
iteration  method. 


(b)  Cal culat&d. .results  for  chaff  clouds 

In  Chapter  VI  of  Ref.  [38]  there  appear  a set  of  curves  of 
error  bounds  and  condition  norms  for  a few  typical  impedance 
matrices  arising  from  chaff  clouds.  In  general,  these  bounds 
rise  with  increase  in  dipole  density  and  numbers,  a trend  which 
eventually  must  be  reckoned  with  if  direct  solutions  to  larger 
order  systems  are  sought.  In  light  of  this  the  iterative  schemes 
are  attractive  and  are  used  here  to  solve  for  the  scattering 
from  clouds  of  up  to  1000  dipoles. 

Numerical  results  presented  in  this  section  are  divided  into 
four  areas:  a check  case;  applications  of  SOR  iteration  to  the 

solution  of  electromagnetic  scattering  by  large  clouds  of  thin 
resonant  dipoles;  application  of  SOI  iteration  to  the  solution 
of  electromagnetic  scattering  by  a small  cloud  of  thin  resonant 
dipoles;  comments  on  applications  of  SOR  to  surface  patch  and  wire- 
grid  models.  The  appropriate  equations  from  the  preceding  sections 
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have  been  translated  into  FORTRAN  and  documented  listings  of  these 
programs  appear  in  Appendix  VI.  All  calculations  were  performed 
with  11  digit  precision  on  a Datacraft  Model  6024  computer  having 
approximately  32k  of  real  fast-access  memory  and  32k  of  virtual 
(disk)  memory.  Cycle  time  for  this  computer  is  approximately  1 
microsecond.  Certain  special  programming  techniques,  unique  to 
this  machine,  are  incorporated  in  the  FORTRAN  programs  to  allow 
psuedo-random  access  to  approximately  6-1/2  million  (24  bit) 
additional  words  of  disk  memory.  Three  and  one-fourth  million 
complex  numbers  can  be  computed,  then  stored  in  a special 
truncated  form  (6  digits)  and  retrieved  using  this  technique. 

Also,  a special  subprogram  is  included  which  computes  mutual 
impedances  between  "distant"  dipoles;  description  and  verifi- 
cation of  this  subprogram  are  also  given  in  Appendix  VI.  This 
subprogram  uses  a special  simplified  calculation  of  the  mutual 
impedance  when  dipoles  are  spaced  greater  than  lx  and  inclusion  of 
this  simplified  calculation  resulted  in  a computation  time  for  the 
approximately  one-tenth  that  of  the  original  estimate  for  the 
N = 1000  case;  estimate  ^ 10  - 12  hours,  actual  time  M hour, 


It  is  important  to  note  that  all  the  results  up  to  this  point 
have  assumed  radially  inhomogeneous  densities  for  the  clouds;  in 
this  section,  however,  all  the  results  assume  randomized  clouds  of 
uniform  density. 


A Check  Case 


Because  some  of  the  clouds  treated  here  by  iterative  methods 
are  sc  large,  it  is  difficult  to  verify  that  the  methods  are 
actually  giving  correct  values  for  echo,  since  no  other  reliable 
independent  methods  exist  for  comparison  checks.  Yet  such  checks 
are  imperative  if  one  is  to  have  some  confidence  in  the  results. 

To  this  end  we  chose  as  a check  case  the  planar  array  sketched  in 
Fig.  50.  It  contains  841  resonant  dipoles  interlaced  into  a 
periodic  structure  with  average  spacings  between  nearest  neighbors 
of  approximately  0.57X,  By  the  technique  developed  by  Munk  [60] 
scattering  from  such  an  array  can  be  readily  obtained  under  the 
assumption  of  no  edge  effects,  i.e.,  the  array  is  considered 
to  be  a section  of  an  infinite  array.  Using  Munk's  technique  and 
S0R  (with  u>=  0.4)  we  have  calculated  the  bistatic  cross  section 
at  the  specular  angle  (0v.=18O°-0j ) for  three  different  incidence 
angles  (0i=9O°,  60°,  30°)  in  the  y-z  plane.  The  resulting  values 

of  the  cross  section  o vs  iteration  order  are  shown  for  the  three 
angles,  respectively,  in  Figs.  51-53.  In  all  cases  these  values 
obtained  by  SOR  agree  very  well  with  Munk's  results,  the  greatest 
discrepancy  (-0.45  dB)  appearing  at  the  0j  = 30°  incidence  angle. 
This  disagreement  is  thought  to  be  inherent  in  the  Munk  solution 
for  angles  close  to  grazing. 
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Figure  50.  A planar  array  of  resonant  wires  used  as 
a check  case. 
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Specular  bistatic  cross  section  (g  = 120 
and  e(k)  versus  iteration  k for  periodic 
array  of  Fig,  50  using  SOR  with  u = 0.4. 


SCATTER  CROSS  SECTION 


In  Figs.  51-53  certain  "convergence  norms"  are  also  computed 
for  each  iterate  k and  displayed  for  comparison  as  quantitive  meas- 
ures of  convergence.  Four  different  norms  appear  in  various  fig- 
ures of  this  section;  three  are  based  on  the  residuals  defined 
by  Eq.  (50)  and  one  is  based  on  normed  changes  in  solution  xvk) 
similar  to  that  defined  by  Eq.  (52),  A summary  of  these  convergence 
norms  is  presented  in  the  following  table. 


TABLE  6 

CONVERGENCE  NORM  DEFINITIONS 


Norms*  based  on  r' 


Norm  based  on  x' 


(HI) 


BjMBMB 

mmsmmam 


Max 

i mi  n{  | x 


*See  Appendix  C of  Ref.  38  for  definitions  of  vector  norms  used. 


The  (I)  and  (IV)  norms  in  this  table  were  chosen  strictly  as  re- 
presentatives of  the  quantities  appearing  in  Eqs.  (51)  and  (52) 
while  the  (II)  and  (III)  norms  were  defined  with  the  physical  prob- 
lem in  mind,  i.e.,  (II)  is  a normalized  measure  of  the  residual 
indicating  the  boundary  condition  (Ej/^n  = 0)  mismatch  on  one 
dipole  in  the  array  and  (III)  is  a normalized  average  of  all 
residuals  for  the  whole  array.  The  (III)  norm  will  be  denoted  by 
e(k)  in  all  data  presented  in  this  section.  Two  points  should  be 
made  here.  One  is  that  the  e(k)  norm  appears  in  all  cases  we  have 
calculated  to  be  the  best  balanced  and  most  trustworthy;  the 
other  is  that  the  behavior  of  e(k)  appears  no  different  for 
random  arrays  of  dipoles  than  it  does  for  the  periodic  array. 

Since  the  results  in  cross  section  were  very  satisfactory  for 
the  periodic  array,  we  infer  that  the  similar  behavior  of  e(k) 
implies  satisfactory  results  in  cross  section  for  the  random 
arrays. 

Very  little  information  is  found  in  the  literature  on 
suitable  choices  for  SOR  convergence  measures  for  large  complex 
system  of  equations  such  as  those  treated  here.  The  convergence 
norm  calculations  are  presented  for  the  purpose  of  empirically 
determining  just  such  a measure  for  these  types  of  problems, 
e.g.,  one  which  might  eventually  be  included  in  the  computer 
programs  to  indicate  a reliable  stopping  point  in  the  iterative 
process.  The  normalized  average  residual  e(k)  appears  to  possess 


the  uniform  characteristics  needed  for  this  job.  It  also  has  the 
interpretation  of  being  a measure  of  the  "average"  boundary  con- 
dition EjAN  = 0 over  the  whole  array.  Other  norms  considered 
do  not  appear  to  indicate  this  same  overall  condition  of  the 
iterated  solution  but,  tend  to  pin-point  specific  residuals  or 
changes  in  the  solution  which,  to  a great  extent,  do  not 
seriously  affect  the  array  scattering  properties  in  the  far 
field.  Other  "averaging"  norms  might  do  as  well  or  better 
than  e'k);  however,  this  study  has  concentrated  on  isolating 
only  this  one  case  which  seems  to  be  well  suited  for  these  types 
of  problems. 

No  attempts  were  made  in  this  study  to  determine  optimum 
relaxation  factors  for  SOR.  An  initial  choice  of  w was  made  at 
the  outset  of  each  new  problem  and  if  convergence  was  indicated, 
no  changes  were  made*  the  exception  is  Fig.  67,  where  changes 
were  made  during  the  same  iteration  run  with  little  observable 
effect. 

SOR  Solutions  for  Scattering  by  Large  Clouds 

of  Chaff  Elements 


The  SOR  iteration  technique  is  used  to  solve  Eq.  (12b)  for 
the  currents  induced  in  arrays  of  dipoles  by  plane  wave  fields 
of  Eqs . (1 1-2)  and  (1 1-3).  The  § polarized  backscatter  a and 
bistatic  cross  section  for  certain  bistatic  angles  (3  = i 10° 
range)  are  calculated  from  these  currents  at  each  step  k of  the 
iteration. 

Figure  54  considers  an  initial  case  of  100  dipoles  in  the 
random  array  configuration.  The  SOR  technique  (ui  = 0.6)  can  be 


compared  to  solution  by  a direct  method  (Cholesky);  resulting 
solutions  from  both  methods  agree  quite  well  (<  0.1  dB).  This 
figure  also  includes  calculated  values  for  the  four  norms 
appearing  in  Table  6.  The  (II)  and  (IV)  norms  vary  erratically, 
although  both  show  overall  decreases  over  the  range  of  k.  The 
(I)  norm  and  e(*0  both  show  a consistent  decrease,  but  only 
e(k)  is  "monotonic"  over  the  whole  range. 

Convergence  characteristics  of  a for  a 500  dipole  random 
array  are  indicated  in  Fig.  55  for  SOR  iteration  usinq  two 
values  of  relaxation  factor,  of0.5  and  co=0.4.  Onlye  fk)  was 
calculated  in  this  case.  Thew=0.5  case  appears  to  converge 
faster  (steeper  slope  one(k))  in  the  early  stages  (k  = 1 to 
k % 20),  however  better  overall  convergence  was  obtained  for 
aj=0.4.  Figure  56  shows  a sample  of  the  bisoatic  cross  section 
pattern  for  k = 10,  20  and  36.  This  figure  ‘ndi cates  che  degree 
of  convergence  obtained  in  this  g = ±10°  sector  at  the  cor- 
responding stage  in  the  iteration.  The  convergence  of  the 
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Figure  54.  Backscatter  cross  section  and  convergence  norms 
(I),  (II),  and  (IV)  versus  iteration  k for 
100  dipole  random  array  using  SOR  with  w = 0.6. 
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Backscatter  cross  section  and  versus  iteration 
k for  500  dipole  random  array  (8  dip/ A3)  using  SOR 
with  u = 0,4  and  u>  = 0,5, 
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Figure  56.  Bistatic  cross  section  pattern  for  500 
dipole  random  array  for  k = 10,  20  and 
36  using  SOR  with  u>  = 0.4. 
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bistatic  pattern  seems  to  be  best  in  the  larger  amplitudes 
and  for  k > 20,  major  changes  occur  only  in  the  null  regions. 


Figure  57  is  the  first  of  a series  of  10  figures  showing 
five  SOR  iterated  solutions  (u>=0.4)  for  a single  1000  dipole 
random  array  (#1).  These  figures  alternately  show  o back- 
scatter  and  bistatic  cross  section  for  five  aspect  angles  of 
the  incident  wave.  Each  of  these  cases  corresponds  to  a new 
"b"  vector  for  the  right  hand  side  of  Eq.  (12b). 


Figure  57  indicates  convergence  of  a backscatter  and  shows 
a comparison  of  the  (I)  norm  and  e(k)  for  e0  = 90°,  4>0  = 0°, 

The  (I)  norm  in  this  case  has  lost  all  resemblance  of  being  a 
monotonically  decreasing  norm  while  e(k)  continues  to  show  a 


smooth  decrease  with  increasing  k.  The  curve  for  a backscatter 


in  this  case  converges  smoothly  to  the  value  a £ 90x2,  a rather 


high  value  for  these  random  arrays 
of  the  bistatic  pattern  (e=tlO°). 
on  the  peak  are  less  than  1 dB  for 


Figure  58  displays  a portion 
Here,  the  amplitude  changes 
k > 5,  while  the  null  depth 


changes  are  more  than  10  dB  over  this  same  interval. 


Figure  59  considers  a new  aspect  angle  (eo=90°,  <j>0  = 10°) 
for  the  same  random  array.  Here,  a backscatter  shows  somewhat 
irregular  convergence  as  compared  to  the  previous  aspect;  how- 
ever, the  same  smooth  decrease  in  e(k)  is  omnipresent.  The 
bistatic  patterns  for  k = 6,  15,  30  and  42  of  Fig.  60  indicate 
considerable  change  is  taking  place  over  this  range.  The 
largest  changes,  however,  occur  in  the  null  regions  and  peak 
amplitude  regions  show  the  lesser  changes. 


Figures  61  and  62  indicate  a and  bistatic  patterns  for 


e0  = 90°,  <f>0  = 20°.  The  e(k)  norm  in  Fig.  61  again  shows  mono- 


tonic improvement  in  average  residuals  and  Fig.  62  indicates  es- 
sentially converged  bistatic  patterns  for  k > 15  with  changes  less 
than  2 dB  in  peak  smplitude  and  less  than  3 dB  in  the  null  region. 
Oscillations  of  a in  Fig.  61  are  less  than  plus  or  minus  1 dB 
and  decreasing  for  k - 25. 


.(k) 


Figures  63  and  64  show  a,  e ' and  bistatic  cross  section 
for  e0  = 90°,  <|>«  = 30°,  Fluctuations  in  a for  k > 16  are  less 
than  2 dB  and  sTk)  is  again  smoothly  decreasing.  Bistatic  patterns 
appear  to  change  very  little  for  k > 30. 


Figures  65  and  66  are  the  last  figures  showing  data  for 
large  random  array  #1  (o0  = 90°,  <j)0  = 40°).  Convergence  norms 
(I)  ar.d  (IV)  are  included  in  Fig.  65  with  e(k),  A1  though ? norms 
(I)  and  (IV)  do  not  have  the  smooth  decrease  shown  by  e(k  1 , it 
appears  that  an  average  curve  of  (IV)  over  ur.s  range  of  k would 
repeat  the  trend  indicated  by  e(k).  The  oscillatory  nature  of 
a backscatter  is  confirmed  in  the  bistatic  pattern  curves  of 
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Fig,  66.  The  final  bistatic  curve  (k  = 45)  is  bounded  by  the 
k - 25  and  k = 35  patterns  and  again,  largest  changes  occur  in  the 
null  region. 


Data  in  the  following  four  figures  (Figs.  67-70)  were  cal- 
culated for  a second  large  random  array  (#2)  with  the  same  average 
density  (8  dip/x^)v and  number  of  dipoles  (N  = 1000)  as  in  the 
previous  case.  The  new  array  was  generated  with  a new  initiali- 
zation of  the  random  positioning  programs.  The  two  cases  con- 
sidered for  this  new  array  correspond  to  aspect  angles  e.  = 90°, 

<J>0  = 0°  and  10°.  0 

fkl 

Figure  67  shows  a and  ev  ' data  calculated  for  e0  = 90°, 

<(>0  = 0°  case  and  Fig.  68  presents  the  corresponding  bistatic  pat- 
terns. Four  values  of  relaxation  factor  (id  = 0.4,  0.35,  0.3  and 
0,25)  were  used  in  this  case  with  the  initial  iteration  performed 
with  u = 0.4.  The  results  for  to  = 0.4  are  indicated  in  Fig,  67 
by  the  marginally  convergent  curve.  The  iteration  was  then  re- 
started (k  = 1)  with  to  = 0.35  and  continued  through  k = 12;  at 
which  time,  w was  changed  and  the  iteration  carried  out  to  k = 30 
for  to  - 0.3;  then  w was  again  changed  this  time  to  u s 0.25  and 
the  process  carried  out  to  the  final  iteration  k = 61.  The 
reason  for  changing  m during  the  same  iteration  run  was  an 
attempt  to  isolate  variations,  if  any,  in  elk)  which  might  cor- 
respond to  different  values  of  u.  No  recognizable  changes  were 
noted;  in  fact,  the  iteration  appeared  to  be  converged  for  all 
k > 30  (oj  = 0.3,  0.25)  and  the  bistatic  patterns  in  Fig.  68 
confirm  this  to  a great  extent. 

A second  aspect  angle  (e0  = 90°,  <j>0  = 10°)  is  considered 
in  Figs.  69  and  70.  Here,  SOR  was  restarted  three  times  for 
random  array  #2  with  a = 0.3,  0.25  and  0.2.  The  two  cases 
a)  = 0.3  and  0.25  were  not  convergent  as  Fig.  69  shows  andw  had 
to  be  reduced  to  m = 0.2  to  obtain  the  one  convergent  case 
indicated  in  the  figure.  Figure  70  shows  bistatic  patterns 
for  k = 20,  30  and  36  for  the  converging  case.  The  largest 
changes  in  these  patterns  again  occur  in  the  null  regions. 

Three  additional  figures  are  included  in  this  section 
(Figs.  71,  72,  and  73)  comparing  convergence  characteristics  of 
a backscatter,  <a>  (the  bistatic  cross  section  average  over 
8 = ±10°)  and  ay  (total  scatter  cross  section  from  the  forward 
scattering  theorem  reviewed  in  Appendix  K).  Figure  71 
presents  ot  and  <0>  with  thecr  curve  previously  calculated  in 
Fig,  57.  The  bistatic  average  <a>  in  this  case  shows  little, 
if  any,  improvement  over  the  original  a curve;  however,  aj  is 
converged  as  early  as  k = 5.  The  rapid  convergence  of  aT 
indicates  that  apparently  the  total  power  scattered  in  aVL 
directions  by  the  random  array  is  insensitive  to  the  computed 
currents,  compared  to  either  a or  <a>. 
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Backscatter  cross  section  and  convergence 
norms  (I)  and  e(k)  versus  iteration  k for 
1000  dipole  random  array  #1  (eo=90°,  <j>o=0°) 
using  SOR  with  u = 0,4, 
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Figure  58.  Bistatic  cross  section  pattern  for  1000 

dipole  random  array  #1  (eQ  = 90°,  = 0°) 

at  k = 5,  15  and  29  using  SOR  with  to  * 0.4. 
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Backscatter  cross  section  and  ev  ' versus 
iteration  k for  1000  dipole  random  array 
#1  (e0  = 90°,  *o  » 10°)  using  SOR  with 
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Figure  61.  Backscatter  cross  section  and  versus 
iteration  k for  1000  dipole  random  array 
#1  (e0  = 90°,  <f>0  = 20°)  using  SOR  with 
to  = 0,4. 
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Backscatter  cross  section  and  ev  ' versus 
iteration  k for  1000  dipole  random  array 
#1  (e0  = 90°,  <j>0  = 30°)  using  SOR  with 
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Figure  64.  Bi static  cross  section  pattern  for  1000 
dipole  random  array  #1  (e0  = 90°,  <f>0  = 
30°)  at  k = 15,  30  and  41  using  SOR  with 
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Backscatter  cross  section  and  convergence  norms 
(I),  eW  and  (IV)  versus  iteration  k for  1000 
dipole  random  array  #1  (eo=90°,  <t>o=40°)  using 
SOR  with  u)=0,4, 
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Backscatter  cross  section  and  ev  ‘ versus 
iteration  k for  1000  dipole  random  array 
#2  (e0  ■ 90°,  to  a °°)  usin9  SOR  with 
u a 0.25,  0.3,  0.35  and  0.4. 
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Figure  68  Bistatic  cross  section  pattern  for  1000 
dipole  random  array  #2  (en  = 90°.  <tn  • 

0 ) at  k = 15,  30,  45  and  61  using  SOR 
with  w = 0.3  and  0.25. 
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Figure  70  Bistatic  cross  section  pattern  for  1000 
cJipoie  random  array  #2  (eQ  = 90° , a.  - 
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Figure  71,  Backscatter,  total  and  average  bistatic 
cross  sections  versus  iteration  k for 
random  array  #1  (Fig.  57), 
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Backscatter,  total  and  average  bistatic 
cross  sections  versus  iteration  k for 
random  array  #1  (Fig.  59). 
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Figure  73,  Backscatter,  total  and  average  bistatic 
cross  sections  versus  iteration  k for 
random  array  #2  (Fig.  69). 
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Figure  72  illustrates  ay*  <a>*  and  the  previously  computed 
a data  from  Fig.  59.  The  average  <a>  in  this  case  does  smooth 
out  the  large  dip  in  the  vicinity  of  k = 6,  however,  its 
overall  convergence  characteristics  are  no  improvement  over 
a "(unaverag^d) . Total  cross  section  aj  for  k > 5 has  converged 
to  very  nearly  the  same  final  a,  value  in  the  previous  figure 
(same  array). 

Values  of  aj  and  <a>  are  compared  in  Fig.  73  with  a from 
Fig.  69  for  random  array  #2.  Both  a and  <a>  in  this  case  have 
similar  characteristics,  however,  neither  one  shows  significant 
improvement  in  convergence  rate  over  the  other.  Note,  the  con- 
verged aj  for  this  new  case  (array  #2)  is  essentially  the  same 
as  that  obtained  for  random  array  #1). 

An  important  result  brought  out  by  all  these  data  is  that 
convergence  rates  for  many  cases  appear  to  be  functions  of  ex- 
citation; i.e.,  given  matrix  A (e.g.,  random  array  #l),wopt 
will  vary  with  "b".  This  is  even  more  apparent  for  random 
array  #2  where  one  value  of  <d  gave  convergence  for  the  first 
angle  (w  = 0.25),  but  was  not  sufficient  to  give  convergence 
at  the  second  aspect  angle.  This  particular  characteristic  of 
SOR  solutions  to  these  EM  problems  merit  further  investigation. 

Much  of  the  a backscatter  data  presented  in  these  figures 
indicates  a rather  wide  range  of  convergence  rates  for  a;  yet, 
manv  of  these  same  cases  have  very  similar  characteristics  in 
e(k),  These  same  cases  often  have  apparently  well  converged 
bistatic  patterns  with  most  readjustments  occuring  in  the  "null" 
amplitudes  beyond  certain  values  for  k.  However,  the  a back- 
scatter curves  sometimes  still  exhibit  considerable  instability 
in  spite  of  the  above  signs.  A probable  cause  for  this  wide 
range  in  convergence  rates  for  a is  the  slo^e  of  the  a back- 
scatter pattern  at  the  desired  aspect  angle;  e.g.,  if  the' aspect 
corresponds  to  a relatively  flat  amplitude  portion  of  the  o pat- 
tern, then  convergence  of  a will  more  than  likely  appear  in  fewer 
iterations.  (A  major  exception  to  this  viewpoint  is  the  rapid  con- 
vergence of  o for  the  large  periodic  array.  Here,  the  reason  for 
fast  convergence  is  probably  not  due  so  much  to  the  flatness  of 
the  pattern  as  to  the  generally  reduced  magnitudes  of  the  off- 
diagonal  elements  of  matrix  A.  Convergence  rates  of  o for  random 
arrays  having  lesser  volume  densities  of  dipoles  would  certainly  be 
faster  for  this  same  reason.)  The  chosen  aspect  angle  for  random 
arrays  can  often  unknowingly  correspond  to  a steep  skirt  or  be 
near  a null  (cusp)  in  the  a backscatter  pattern  and  the  slightest 
changes  in  calculated  currents  will  cause  pronounced  changes  in  the 
iterated  o curves.  If,  however,  these  same  a curves  are  accompanied 
by  smooth  monotonically  decreasing  e(k)'s,  then  these  iterated 
solutions  can  still  in  some  average  sense  be  assumed  to  be  nearing 
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the  true  solution  This  implies  that  averages  of<r,  over  many 
seemingly  converged  cases,  might  actually  be  good  approximations 
of  the  true  averages  if  cr  were  known  exactly.  A great  deal  mor - 
data  is  obviously  needed  to  confirm  or  deny  this  relationship. 
However,  if  this  should  be  the  case,  many  of  the  statistics  of 
for  these  large  rather  dense  random  arrays  could  be  calculated 
without  requiring  rigorous  convergence  of  the  iterative  technique 
to  the  exact  solution. 

There  are  certain  distinct  characteristics  which  keep  re- 
appearing in  these  iterated  solutions  for  the  1000  dipole  random 
arrays;  namely,  rapid  convergence  of  oT  and  the  relative  stability 
of  angular  positions  of  peaks  and  nulls  in  tne  bistatic  patterns. 

A sample  calculation  of  the  half  power  beam  width  for  a uniformly 
excited  circular  aperture  with  the  same  projected  area  as  the 
1000  dipole  array  (^120x2)  results  in  an  approximate  9 beam 
width.  The  half  power  beam  widths  of  peaks  appearing  in  the 
bistatic  patterns  interestingly  enough  consistently  fall  in  the  b 
- 10°  range.  These  characteristics  are  undoubtedly  related  to  the 
fundamental  size  and  density  of  these  arrays.  Further  investi- 
gations of  these  relationships  and  of  overall  a backscatter 
statistics  appears  to  be  warranted. 

SOI  Iteration  Solution  for  Scattering  by  a Small 

Cloud  of  Chaff  Elements 

The  newly  derived  SOI  technique  introduced  previously  is 
used  here  to  solve  Eq.  (12b)  for  a 100  dipole  (8  dip/>3)  random 
array.  The  results  are  shown  in  Fig.  74  where  the  two  sets  of 
curves  correspond  to  two  values  of  influence  coefficient  C.  The 
direct  solution  obtained  by  Cholesky's  method  is  also  indicated. 
Computations  corresponding  to  C = 0.2  required  approximately  30 
seconds  per  iteration  and  used  a 14  x 14  maximum  submatrix  size. 
Convergence  of  o in  this  case  was  irregular  and  increased 
for  k > 16.  Computations  for  C = 0.1  required  a maximum  44  x 44 
submatrix  and  150  sec/iteration  and  convergence  in  this  case 
took  fewer  iterations  (k  ^ 7)  and  e(k)  exhibited  a pronounced 
decrease  over  this  same  range. 

Fiqure  75  is  included  here  for  comparison  of  SOI  with  S0R. 

The  S0R  iteration  is  used  in  this  case  to  solve  the  same  system 
of  equations  as  for  the  above  SOI  method.  The  a and  el  data  r 
three  relaxation  factors  are  shown;  u = 0.7  was  a divergent  case, 
u = 0.6  converged  in  the  fewest  number  of  steps  and  u>-  O.b  con- 
verged, but  required  more  iterations  than  u>  = 0.6.  Iteration 
time  for  S0R  (N  = 100)  was  approximately  nine  seconds  per  itera- 
tion - a considerable  improvement  in  time  over  SOI.  me  bui 
algorithm  is  extremely  inefficient  compared  to  the  simple  form 
of  S0R  and  for  comparable  rates  of  convergence,  50R  is  estimated 
to  be  approximately  15  times  faster. 
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Figure  74. 
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Backscatter  cross  section  and  e'  ' versus 
iteration  k for  100  dipole  random  array 
using  SOI  with  c = 0.2  (M=14)  and 
c = 0.1  (M=44) . 
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Figure  75 


Backscatter  cross  section  and  ev  ' versus 
iteration  k for  100  dipole  random  array 
using  SOR  with  u = 0.7,  0.6  and  0.5. 


The  direct  solution  to  the  above  case  required  approximately 
44  seconds  while  SOR  took  90  seconds  (k  = 10,  u>  = 0.6)  to  solve  the 
same  system.  Recall,  however,  that  the  number  of  computations 
(multiplications)  in  Cholesky's  direct  method  goes  up  as  ^1/6  N^, 
while  SOR  used  ^n2  computations  per  iteration;  therefore,  if  the 
number  of  iterations  required  to  achieve  the  desired  accuracy  is 
< 1/6  N,  then  the  SOR  iteration  will  have  a time  advantage,  even 
over  the  direct  method. 

Comments  on  the  Applications  of  SOR  to 

Surface  Patch  and  Wire-Grid  Models 

Calculations  using  the  SOR  technique  to  solve  Eq.  (12b)  for 
a surface  patch-modeled  flat  plate  and  wire-grid  modeled  circular 
loop  (polygon  loop)  have  been  unsuccessful,  even  for  trivially 
small  cases  using  a 12-mode  surface  patch -modeled  square  plate 
(a  x A)  and  a 10-mode  wire-grid  modeled  loop  (0.3A  radius). 

Both  types  of  modeling  used  the  overlapping  type  modes,  cosines 
for  the  plate  and  piecewise  sinusoids  for  the  loop.  The  apparent 
numerical  difficulty  arises  in  the  large  magnitudes  of  the  over- 
lapping mutual  impedances;  these  mutuals  are,  in  fact,  almost  as 
large  in  magnitude  as  the  self  impedances  positioned  on  the  main 
diagonal  of  A.  Hence,  it  appears  that  if  off-diagonal  terms  in 
rows  of  A are  almost  as  large  in  magnitude  as  the  self  term,  then 
the  SOR  method  fails  to  converge  for  all  w.  A modified  approach 
which  may  be  worth  investigating  is  a hybrid  iteration  technique 
probably  combining  SOI  with  SOR.  The  method  would  again  be  based 
on  solving  small  systems  of  equations  directly  (SOI)  but  then  using 
these  current  solutions  to  up-date  other  currents  in  the  the  cor- 
responding "Sphere  of  Influence".  This  could  be  considered  another 
form  of  "overlapping"  block  iteration. 

D,  The  Question  of  Closer  Spacings 

In  all  the  work  described  so  far,  the  reader  will  notice  that 
we  have  not  discussed  clouds  with  average  spacings,  d/A,  less  than 
0.5,  or  in  other  words,  clouds  with  average  dipole  densities  greater 
than  8/a3,  Here  we  mean  "average  density"  in  the  sense  of  Appendix 
III,  which  implies  that,  for  the  kind  of  radially  inhomogeneous 
clouds  we  assumed  in  the  majority  of  cases,  the  actual  dipole 
densities  in  the  center  of  the  cloud  can  be  as  high  as  24/a3. 

(For  the  uniform  clouds  discussed  in  the  previous  section,  of 
course,  the  average  dipole  densities  apply  throughout  the  cloud.) 
Considering  that  each  dipole  is  almost  A/2  in  length  these  numbers 
should  convey  the  impression  of  a rather  tightly  packed  cloud  with 
many  elements  very  close  at  their  closest  points.  It  was  this 
proximity  which  led  us  to  be  cautious  and  question  the  validity 
of  our  algorithm  for  obtaining  the  currents  on  dipoles  in  clouds 
with  d/A  < 0.5  on  the  average.  In  our  algorithm  we  assume  that 


each  wire  is  divided  into  two  (P=2)  equal  segments  which  support 
one  (P-1)  piecewise  sinusoidal  current  mode.  This  assumption  forces 
the  effects  of  coupling  from  nearby  wires  to  reside  only  in  the 
complex  amplitude  of  the  current  mode  - coupling  cannot  change  the 
shape  of  this  single  current  mode.  For  two  wires  which  approach 
each  other  very  closely,  except  in  very  special  relative  orientations, 
we  suspect  that  the  true  situation  demands  a change  in  the  shape  of 
the  current  distribution  as  well,  meaning  that  the  wires  should  be 
divided  into  more  segments  .P>2),  thereby  supporting  more  than  one 
piecewise  sinusoidal  mode  thereby  allowing  flexibility  in  current 
shape.  This  is  easily  done  and  is  provided  for  in  our  computer 
programs;  however,  doing  so  has  the  undesirable  effect  of  reducing 
the  number  of  wires  allowed  in  a cloud,  the  impedance  matrix  size 
being  fixed.  We  investigated  the  validity  of  our  two-segment  model 
with  increasing  cloud  densities  in  the  hope  that  it  would  hold  up 
for  denser  clouds  than  those  represented  by  d/x  =0,5.  This  section 
presents  some  of  our  findings. 

In  order  to  investigate  the  question  of  closer  spacings  we 
calculated  spatial  average  backscattering  cross  sections  using 
three  variants  of  the  Richmond  reaction  matching  technique: 

(1)  Two-segment  model  with  12  point  numerical  integration.  This 
variant  is  the  one  used  for  essentially  all  the  results  pro- 
duced under  this  contract.  In  it,  each  dipole  is  divided  into 
two  segments  supporting  piecewise-sinusoidal  currents  whose 
reaction  integrals  are  performed  approximately  using  a 12  point 
numerical  integration  routine, 

(2)  Two-segment  model  with  exact  integration.  This  variant  is 
similar  to  (1)  but  the  reaction  integrals  are  expressed 
analytically  in  closed  form  and  are  evaluated  exactly. 

This  method  is  superior  to  (1)  in  precision,  is  equivalent 
to  (1)  in  required  computer  memory,  but  takes  more  time 
(about  60%  more  time,  it  turns  out). 

(3)  Four-segment  model  with  exact  integration.  This  variant 
models  each  dipole  with  four  segments,  thereby  allowing 
a more  precise  resolution  of  the  induced  current  on  the 
dipole  than  is  possible  with  the  two-segment  model.  The 
currents  on  each  segment  are  integrated  exactly.  This 
method  is  the  most  precise  of  the  three,  but  it  requires 
nine  times  the  computer  memory  required  by  the  two-segment 
models  and  a great  deal  more  computer  time.  Thus,  whereas 
we  can  solve  for  200  dipole  clouds  with  two  segment  models 
we  could  solve  for  only  22  dipole  clouds  using  a four-seg- 
ment model , 


We  assumed  inhomogeneous  clouds  containing  N=10  dipoles  and  cal- 
culated  the  average  backscattering  cross  section  of  each  (averaged 
over  the  usual  512  different  aspect  angles  around  a great  circle 
in  V-V  and  H-H  polarizations).  Twenty  clouds  were  randomly 
generated  for  each  spacing  d/x  - 0.5  and  0.25  and  results  for  each 
were  calculated  using  the  three  variants  discussed  above.  Typical 
results  of  these  calculations  are  presented  in  Table  7. 

The  conclusions  derived  from  Table  7 may  be  summarized  as  follows: 

(1)  For  d/x  = 0.5,  all  three  methods  give  results  in  close 
agreement.  Thus,  we  have  some  assurance  that  the  model 
we  have  been  using  heretofore  (the  two-segment  model 
with  numerical  integration)  is  sufficiently  accurate. 

(2)  For  d/X  = 0.25,  the  two-segment  model  with  exact  in- 
tegration appears  to  correlate  better  with  the  four- 
segment  model,  although  the  model  with  numerical  in- 
tegration really  does  not  perform  badly  at  all.  To  be 
safe,  however,  we  suggest  use  of  the  two-segment  model 
with  exact  integration  for  average  spacings  less  than 
0.5  at  the  expense  of  60%  more  computation  time. 

The  three  reaction  matching  variants  described  above  were  also 
used  to  generate  (using  the  Wright-Patterson  Air  Force  Base  computer) 
pattern  functions  of  six  inhomogeneous,  50  dipole  clouds  - three  with 
d/x  =0.25  and  three  w’th  d/x  = 0.125.  The  results  are  plotted  in 
Figs.  76-93.  From  these  patterns  it  appears  that  for  the  larger 
average  spacing,  a two  segment,  exact  integration  model  is  adequate 
to  obtain  good  scattering  patterns,  but  for  the  smaller  average 
spacing,  even  the  four  segment,  exact  integration  model  has  not 
clearly  converged,  in  its  pattern  function.  We  feel  that  for  average 
spacings  less  than  0.25x(i.e.,  64/x2  density)  in  the  inhomogeneous 
clouds  assumed  here,  the  algorithms  presented  in  this  report  are  not 
reliable. 

One  additional  study  which  was  made  involved  the  statistics  of 
the  echo  from  200  clouds,  each  composed  of  only  two  dipoles  randomly 
spaced  and  oriented  in  the  usual  manner.  From  these  clouds  we 
generated  histograms  of  the  backscattering  cross  section  at  one 
look-angle  and  the  backscattering  cross  section  averaged  overbid 
look  angles.  For  the  case  where  the  average  spacing  was  d/x  -1.43 
(Fig  94  gives  the  statistical  distribution  of  the  spacing),  the 
relative  frequencies  of  the  cross  sections  averaged  over  512  look 
angles,  with  and  without  coupling,  are  given  in  Figs.  95a, b,  re- 
spectively. Relative  frequencies  based  on  1 look  angle  are 
given  in  Figs.  96a, b.  Note  that,  although  the  averages  derived 
in  Figs.  95  and  96  are  consistent,  the  distributions  are  dif- 
ferent, the  data  for  1 look  angle  being  more  spread  out.  For 
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the  512  look  angle  case,  the  appearance  of  an  exponential  distri- 
bution is  clearer.  In  both  cases,  the  coupled  and  uncoupled 
dipoles  exhibit  similar  histograms,  as  expected  with  an  average 
spacing  as  large  as  1.43a, 


TABLE  7 


N = 10  dipoles 
d = 0.5A 


Cloud 

Number 

1 

2 

3 

4 

5 

6 

7 

8 
9 

10 


Two-Segment  Model  Four-Segment  Model 

Numerical  Integration  Exact  Integration  Exact  Integration 


1 .080880 
1.139636 
1.124152 
1.789712 
0.861137 
1.293543 
0.489466 
1.070567 
0.902232 
0.649599 


N = 10  dipoles 
d * 0.25A 


1.080899 
1.243639 
1.131229 
1.789627 
0.861061 
1.444584 
0.469868 
1 .070436 
0.901733 
0.620836 


1.068370 
1.277114 
1.130523 
1.745001 
0.893994 
1.442656 
0.460119 
1 .070025 
0.904238 
0.617651 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 


0.657790 

0.651528 

0.647247 

0.680643 

0.741439 

0.745068 

0.680060 

0.686915 

0.669449 

0.575100 

0.53224 

0.536879 

0.468432 

0.476924 

0.477237 

0.835393 

0.989235 

1.001033 

0.337658 

0.298744 

0.294067 

0.566090 

0.565526 

0.537847 

0.681039 

0.872147 

0.851511 

0.306615 

0,314593 

0.311840 
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backscattering  pattern,  N=50  dipoles,  d/A=C,25,  P=2  segments 
oint  integration, 


RANDOM  CLOUD,  D=0.25  LAMDA.  INT=0.  N0S"2.  THETA-THETA  RCS 


backscattering  pattern,  N=50  dipoles,  P=2  segments 
0,25,  exact  integration. 


e-e  backscattering  pattern,  N=50  dipoles,  P=4  segments 
d/x=0.25,  exact  integration. 
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backscattering  pattern,  N=50  dipoles,  P=2  segments 
0.25,  12  point  integration. 


RANDOM  CLOUD . 0=0.25  LAMDA.  INT=0.  N0S=2.  PHI-PHl-RCS 


backscattering  pattern,  N=50  dipoles,  P=2  segments, 
0.25,  exact  integration. 


backscattering  pattern,  N=50  dipoles,  P=2  segments 
0.25,  12 -point  integration. 


POLE  RANDOM  CLOUD,  0=0.25  LAMDA.  INT=0.  N0S=2.  TilETA-PHI  RCS 


RANDOM  CLOUD.  0=0.25  LAMDA.  INT=0.  N0S=4.  THETA-PHI  RCS 


0.125,  exact  integration. 


LE  RANDOM  CLOUD.  D = 0.125  LAMDR ..  INT-O.  N0S=4.  THETA-THETA  RCS 


backscattering  pattern,  N=50  dipoles,  P-2  segments 
0.125,  12-point  integration. 
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Figure  90,  *-<f>  backscattering  pattern,  N=50  dipoles,  P=4  segments, 

d/x=0.125,  exact  integration. 


50  DIPOLE  RANDOM  CLOUD,  D=0.125  LAMDA . INT=1,  N0S=2,  THETA-PHI  RCS 


backscattering  pattern,  “-50  dipoles,  P=2  segments 
0.125,  exact  integration. 
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backscattering  pattern,  N=50  dipoles,  P=4  segnients 
0.125,  exact  integration. 


Figure  94.  Histogram  of  the  center-to-center  distances  of 
random  two-dipole  clouds.  Average  spacing 
d/A  % 1.43. 


If  a very  small  average  spacing  is  assumed,  and  accordingly,  a 
4-segment  model  with  exact  integration  is  used  for  each  dipole,  the 
curves  of  Figs.  97-98  result.  Figure  97  is  the  distribution  of  the 
spacing,  with  the  rather  small  value  of  average  spacing  d/A  = 0.286. 
Figures  98a, b present  the  relative  frequencies  of  the  cross  sections 
averages  over  512  look  angles  with  and  without  coupling.  Again,  the 
exponential  trend  of  the  histograms  is  evident. 

From  Figs.  95b  and  98b,  for  the  two  dipoles  uncoupled,  we  note 
that  for  far  spacings,  the  average  echo  is  about  2<o0>  or  about  0.35a2, 
whereas  for  close  spacing  the  average  echo  exceeds  this  {'4). 47a2). 

This  is  expected  because  for  such  a close  average  spacing  the  two 
dipoles  cannot  be  excited  incoherently  and  their  echo  therefore  lies 
above  that  ror  totally  incoherent  scatterers.  This  effect  for  two 
dipoles  variously  spaced  is  shown  in  Fig.  99.  The  2<oo>  law  does  not 
appear  to  be  reached  until  d/A  ^1.4.  For  clouds  containing  larger 
numbers  of  uncoupled  dipoles,  the  limit  N<o0>  is  expected  to  be 
reached  for  smaller  spacings  due  to  the  larger  overall  extent  of  the 
clouds. 


MMMH 


40 


>• 

o 

z 

UJ 

o 20 

UJ 

tc 

u. 


RCS  WITH  COUP 
«J>  . 0.2552 


0.2  0.4  0.6 

(a) 


RCS  NO  COUPLI 
<cr>»  0.3506 


UJ 

o 20 

id 

tc 


Figure  96.  Histograms  of  the  radar  cross  sections  (single 
aspect)  of  the  clouds  generated  for  Fig.  94. 
(a)  with  coupling  (b)  with  no  coupling, 
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Figure  97.  Histogram  of  the  center-to-center  distance  of 
random  two-dipole  clouds.  Average  spacing 
d/x  2:0,29. 


From  Figs.  95a  and  98a,  for  the  two  dipoles  coupled,  we  see  a 
trend  consistent  with  what  has  been  said  in  the  above  paragraph. 
These  figures  show  an  average  cross  section  of  ^0.25x2  for  both  the 
far-spaced  and  the  near-spaced  dipoles,  seemingly  violating  the 
earlier  conclusion  that  the  near-spaced  dipoles,  because  they  are 
more  strongly  coupled,  should  present  a smaller  average  cross 
section  than  do  the  far-spaced  dipoles.  What  we  are  seeing  how- 
ever is  the  effect  of  cohere  t excitation  due  to  the  close 
proximity  of  the  wires,  an  effect  which  increases  the  average  cross 
section,  It  is  not  increased  as  high  as  the  uncoupled  wires,  how- 
ever, due  to  the  coupling  which  tends  to  reduce  the  average  cross 
section,  and  so  ends  up  with  a value  which  in  our  example  happens 
to  about  equal  that  for  the  coupled  wires  with  larger  spacing. 
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Figure  99.  Average  cross  section  of  random  two-dipole  clouds 
as  a function  of  average  center-to-center  spacing 
between  dipoles. 
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E.  The  Question  of  Mixed  Lengths 

Tenuous  chaff  clouds  consisting  of  wires  of  identical  length 
resonating  at  about  a half  wavelength  display  a bandwidth  of  about 
20%,  or  somewhat  greater  for  denser  clouds  (see  Fig.  15).  Threats 
which  are  expected  over  a greater  bandwidth  than  this  demand  the  use 
of  a variety  of  wire  lengths  within  the  same  chaff  cloud.  This 
poses  the  question,  what  is  the  influence  of  coupling  on  chaff 
elements  of  mixed  lengths?  If  the  bandwidth  ratio  of  interest 
is  10  to  1 for  example,  at  the  low  end  of  the  spectrum  some  wires 
will  be  0.05  Along  and  others  will  be  0.5x  long.  At  the  high  end 
of  the  spectrum,  some  wires  will  be  0.5x  long  and  others  will  be 
5\  long.  The  first  case  presents  little  difficulty  - the  shorter 
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wires  are  very  ineffective  scatterers,  coupled  only  weakly  to 
nearby  neighbors  and  their  presence  can  be  ignored  to  a very  good 
approximation.  The  second  case  does  present  problems,  however, 
because  the  larger  wires  require  a large  number  of  segments  to 
model  them  accurately.  This  has  the  undesirable  effect  of  reducing 
the  total  number  of  wires  permitted  in  a cloud,  assuming  a fixed 
matrix  size. 


During  the  period  of  this  contract,  we  made  a brief  investigation 
of  small  clouds  containing  wires  of  two  lengths,  0.475a  and  0.703A  long. 
The  shorter  wires  were  resonant,  each  one  in  isolation  having  a maximum 
tumble  average  cross  section  of  about  <o]>  2:0.15x2;  the  longer  wires 
were  anti  resonant,  each  one  in  isolation  having  a minimum  tumble  average 
cross  section  of  about  <o2>  2:0.038x2  [61].  These  two  lengths  were 
purposely  chosen  to  take  advantage  of  their  maximum  disparity  in  tumble 
average  echo.  Four  curves,  shown  in  Figs.  100-103,  were  generated, 
each  showing  the  calculated  averaged  backscattering  cross  section  <om> 
of  clouds  containing  N = 2,  4,  6,  and  8 wires,  averaging  being  over 
512  look  angles  in  the  e-e  and  <!>-<)>  polarizations  of  transmitter  and 
receiver.  Ten  clouds,  each  with  these  numbers  of  wires,  were  calcu- 
lated and  the  <am>  of  each  are  plotted  as  a dot.  The  ensemble  average 
of  these  ten  values  are  plotted  as  a cross.  Four  different  values  of 
average  spacing,  d/X  = 4.0,  1.0,  0.5,  0.25,  as  defined  for  inhomgeneous 
clouds,  were  assumed,  and  in  all  cases  equal  numbers  N]  N2  N/^  ot 
wires  of  the  two  lengths  were  assumed.  On  each  of  the  curves,  the 
straight  line  Ni<a-|>+N2<02>  vs  N appears  in  order  to  give  the  reader 
an  estimate  for  the  average  echo  in  the  absence  of  coupling. _ The 
trends  are  the  same  as  those  observed  in  previous  work  treating  clouds 
of  identical  resonant  wires.  Average  echo  is  reduced  by  coupling  but 
not  by  as  large  a percentage  as  in  the  case  where  all  wires  are 
resonant.  For  example,  for  d/x  = 0.5,  if  all  N wires  are  resonant, 
one  expects  the  average  echo  of  N wires  with  coupling  to  be  about  60a  ot 
that  with  these  same  wires  uncoupled.  If,  however,  the  N wires  are 
resonant  and  half  antiresonant,  one  can  expect  the  average  echo  of  the  N 
wire  mixture  to  be  about  78%  of  that  with  the  same  wires  uncoupled. 
Evidently,  the  antiresonant  dipoles,  whose  tumble  average  echo 
is  naturally  low,  are  not  so  severely  influenced  by  coupling. 

The  computer  program  used  to  generate  data  for  multiple  length 
chaff  is  given  in  Appendix  D. 


F.  Additional  Experimental  Results 

During  the  earlier  phases  of  this  program  a few  experiments 
were  performed  to  gather  data,  to  check,  or  to  complement  calculated 
data.  Some  of  the  results  of  these  experiments  have  already  been 
presented  where  appropriate;  in  this  section  we  document  whatever 
other  experimental  data  were  recorded. 


1 


I 


7 


* r 


149 


(AVERAGE  SPACING  >4\) 
N,  ■ N2  ■ N/2 


NUMBER  OF  DIPOLES  (N) 


Figure  100,  Calculated  average  backscattering  cross  sections  for 
ensembles  of  clouds  containing  equal  numbers  of  two 
wire  lengths,  i-\/  =0.495,  W =0.703,  with  average 
spacing  d/x=4,0,  Straight  line  represents  decoupled 
dipoles,  crosses  are  averages  of  the  data. 
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Calculated  average  backscattering  cross  sections  for 
ensembles  of  clouds  containing  equal  numbers  of  two 
wire  lengths,  Z]/  =0.495,  12/  =0.703,  with  average 
spacing  d/A=0,5,  Straight  line  represents  decoupled 
dipoles,  crosses  are  averages  of  the  data. 
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Figure  103. 
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Calculated  average  backscattering  cross  sections  for 
ensembles  of  clouds  containing  equal  numbers  of  two 
wire  lengths,  i]/  =0.495,  iz/  =0.703,  with  average 
spacing  d/A=0,25,  Straight  line  represents  decoupled 
dipoles,  crosses  are  averages  of  the  data. 
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(1)  Experimental  Verification 


It  is  important  to  verify  that  the  data  calculated  by  computer 
are  indeed  good  approximations  to  what  would  be  measured  in  controlled 
laboratory  experiments.  Such  experiments  were  performed  on  selected 
frozen  models  whch  were  considered  to  be  severe  tests  of  the  com- 
puter predictions.  Figures  104  and  105  show  photographs  of  a matrix 
of  125  carefully  dimensional  2.0"  x 2.0"  styrofoam  cubes.  Each 
cube  can  have  embedded  in  it  (by  means  of  an  accurately  machined 
jig)  a rod,  located  near  one  edge.  By  orienting  each  cube  in  one  of 
12  different  possible  positions  and  placing  it  in  a styrofoam  box, 
a cloud  of  125  dipoles  can  be  built  up.  Although  this  scheme  does 
not  allow  all  possible  orientations  of  the  dipoles,  there  is  a suf- 
ficient variety  of  orientations  and  spacings  to  create  a rather 
aperiodic  structure. 


The  most  severe  test  of  the  accuracy  of  the  computer  routines 
is  to  compare  experimental  and  calculated  backscattering  patterns 
(using  full  matrix  Scrout)  when  all  dipoles  are  oriented  parallel  in  a 
regular  periodic  array  and  closely  spaced.  Results  for  two  such  cases 
are  presented  in  Figs.  106  and  107  for  27  dipoles  and  125  dipoles., 
respectively.  In  both  cases  all  dipoles  were  horizontal  and  the 
backscattering  cross  sections  for  horizontal  polarizations  of  trans- 
mitter and  receiver  were  recorded  in  a horizontal  360°  cut  around  the 
cloud.  A frequency  of  3,13  GHz  was  chosen  to  bring  each  dipole  to  its 
free  space  resonance,  and  caused  a spacing  between  adjacent  dipoles 
of  d/x  = 0.53.  Typical  disparities  of  about  2 dB  are  evident,  but 
the  overall  pattern  is  well  predicted.  ..Some  of  the  disparity  is 
due  to  imperfections  in  the  mathematical  model  and  round  off  error, 
but  most  of  the  error  is  caused  by  errors  in  measurement.  We  made 
several  experimental  runs,  tearing  the  cloud  apart  and  reconstructing 
it  as  identically  as  possible  between  each  run,  and  found  that  the 
experimental  data  had  a variance  which  enclosed  the  calculated 
curves.  This  convinced  us  that  the  computer  routines  are  accurate 
and  the  data  based  on  them  are  as  valid  as  if  measured.  Another  27- 
dipole  cloud  was  constructed  with  the  dipoles  randomly  oriented  with 
an  average  spacing  of  d/x  = 0.53.  Calculated  and  measured  results  are 
shown  in  Fig,  108  and  again  they  compare  very  well. 


In  the  above  experiments,  the  125-cube  styrofoam  matrix  without 
dipoles  had  an  echo  below  the  internal  noise  level  of  the  measuring 
system. 


(2)  Extinction  Measurements  Through  an 
Artificial  Chaff  Cloud 


A beam  proceeding  through  a random  medium  such  as  a chaff  cloud 
suffers  energy  loss  through  scattering  by  each  particle  into  directions 
other  than  forward  and  into  polarizations  other  than  incident.  This 
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Figure  108.  Measured  and  calculated  E-plane  backscattering  cross-section  patterns  for  a cloud 

of  27  dipoles  randomly  oriented  in  styrofoam  cubes.  Average  dipole  spacing  was  0.53X. 


extinction  of  the  beam  is  important  to  chaff  cloud  investigations 
because,  clearly,  if  it  causes  a significant  diminution  of  energy 
toward  the  rear  of  the  cloud,  chaff  elements  there  will  be  relatively 
ineffective  contributors  to  backscatter  and  might  be  better  used 
elsewhere.  To  observe  extinction  and  extinction  rate  through  a chaff 
cloud  as  functions  of  dipole  density  is  therefore  of  interest  to  us. 
However,  to  obtain  significant  extinction  requires  a sizeable  cloud 
containing  thousands  of  dipoles,  and  considering  that  the  problem 
is  a statistical  one  in  which  many  similar  clouds  must  be  generated 
to  obtain  averages,  the  computer  generation  of  extinction  data 
becomes  a formidihle  task.  Moreover,  in  the  early  part  of  this 
program  we  did  not  have  the  capability  of  generating  such  large 
clouds,  so  we  turned  to  a few  experiments  to  observe  the  extinction 
through  artificial  chaff  clouds.  In  this  section  we  document  some 
of  the  results  of  these  experiments. 

Figures  109-112  show  the  average  insertion  loss  observed 
between  a horn  antenna  and  a receiving  dipole  probe  situated  in 
various  line-of -sight  positions  within  a medium  of  tumbling  resonant 
dipoles.  The  dipoles  were  enclosed  in  a wooden  "box",  30"  long  in 
the  direction  of  propagation  and  having  a 24"  square  cross  section, 
with  foam  "windows"  at  both  ends  and  hairflex  absorber  (or  aluminum 
foil)  lining  on  the  other  four  walls.  The  box  was  supported  on 
circular  rims  such  that  it  could  be  rotated  continuously  about  the 
line-of-sight  axis,  thereby  tumbling  its  contents  in  a random  manner, 
The  dipole  probe,  encapsulated  in  a protective  foam  sphere,  was 
drawn  along  the  line-of-sight  from  the  front  window  to  the  rear  one 
along  a slender  dielectric-tube  containing  the  coaxial  line  exiting 
through  the  rear  window  and  feeding  the  receiver.  A horn  antenna 
disposed  about  33"  from  the  front  window  served  as  the  illuminating 
source.  The  signal  received  from  the  probe  was  measured  for  several 
minutes  duration  of  tumbling  and  averaged  over  this  time  period  for 
selected  probe  positions  between  the  windows. 

The  curves  shown  in  Figs.  109-112  show  the  averaged  difference 
(in  dB)  between  the  received  signals  without  and  with  dipoles  in  the 
box,  i.e.,  insertion  loss,  for  polarization  of  the  probe  parallel  to 
and  orthogonal  to  the  incident  linearly  polarized  wave.  Ideally, 
this  differencing  scheme  should  remove  the  effect  of  range  on  energy 
decrease  and  leave  only  the  extinction  due  to  particle  scattering. 

All  data  were  taken  at  about  2.9  GHz.  Figure  109  shows  results  for 
1000  resonant  dipoles  (nails),  each  one  encapsulated  completely 
in  a 2.38"  foam  sphere.  Figure  110  shows  results  for  1000  resonant 
dipoles  (copper  wire),  each  one  encapsulated  completely  in  a 2" 
diameter  foam  sphere,  tumbled  together  with  850  free  dipoles. 

Figure  111  shows  results  for ^3200  resonant  dipoles  (nails)  in 
1-1/2"  foam  spheres  while  Fig.  112  shows  results  for ^7200  resonant 
dipoles  (nails)  in  1"  foam  spheres.  (In  these  latter  two  cases  the 
dipoles  protruded  outside  the  spheres.)  The  effects  of  progressively 
higher  dipole  densities  is  evident  in  the  progressively  increasing 
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Figure  110,  Measured  insertion  loss  of  same-sense  and  cross-sense 
polarizations  for  1000  resonant  dipoles  encapsulated 
in  2"  foam  spheres,  plus  250  free  dipoles,  f 2 .9  GHz 
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Measured  insertion  loss  of  same-sense  and  cross-sense 
polarizations  for  ^3200  resonant  dipoles  encapsulated 
in  1-1/2"  foam  spheres,  f ^ 2.9  GHz, 
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extinction  rates  shown  in  this  sequence  of  figures.  Some  standing 
wave  effects  between  the  windows  are  also  evident  in  the  non- 
monotonically  decreasing  character  of  the  curves.  Averaging  this 
undesired  effect  Out,  one  observes  extinction  rates  which  are  higher 
in  the  region  within  3 or  4 wavelengths  of  the  front  interface  than 
they  are  deeper  in  the  cloud.  Deep  in  the  cloud  the  parallel  and 
orthogonally  polarized  components  exhibit  the  same  extinction  rates 
as  well  as  the  same  extinction.  This  is  to  be  expected  because  deep 
in  the  cloud  the  incident  wave  has  been  so  severely  depolarized  by 
the  many  random  scattering  interactions  that  no  polarization  pref- 
erence exists.  Table  8 lists  the  approximate  extinction  rates  deep 
in  the  cloud. 


TABLE  8 

EXPERIMENTALLY  DETERMINED  EXTINCTION  RATES 


Fig.  No. 

Density  (dip/ a3) 

Extinction 

109 

% 5 

<3.9 

no 

* 7 

^3 

111 

'v-  9 

<3.6 

112 

M2 

•v6 

The  dipole  densities  listed  here  are  rough  estimates. 


Some  additional  tests  were  performed  with  metal  sheets  covering 
two  and  then  four  of  the  hairf lex-coated  walls.  Energy  scattered  by 
the  particles  out  of  the  incident  beam  into  the  walls  is  absorbed 
there  if  all  walls  are  hairflex.  This  would  simulate  a cloud 
smaller  in  transverse  extent  than  the  incident  beamwidth,  any  energy 
exiting  the  sides  of  the  cloud  being  lost  to  space.  Energy  scattered 
by  the  particles  out  of  the  incident  beam  into  the  walls  is  reflected 
back  into  the  beam  if  all  the  walls  are  metal.  This  would  simulate 
a very  large  cloud  illuminated  by  a plane  wave.  As  expected,  the 
extinction  rate  was  reduced  in  this  latter  case;  for  example,  in  one 
set  of  tests  the  observed  rates  deep  in  the  clouds  were  4.1  dB/A, 

3 dB/A,  and  T.8  dB/A  with  0,  2,  and  4 walls  covered  with  metal  , 
respectively. 


(3)  Scattering  from  Touching  Chaff  Elements 

A series  of  measurements  were  made  of  the  radar  backscatter 
from  4"  foam  spheres  sprinkled  with  aluminum  strip  chaff  and 
aluminized  glass  chaff  provided  by  the  Avionics  Laboratory,  Figures 
113-116  relate  to  the  aluminum  strip  chaff  and  Figs.  117  and  118 
relate  to  the  glass  chaff.  In  all  figures,  the  solid  curves  represent 
the  echo  of  a 4"  foam  sphere  silver-painted  (its  imperfect  surface 
explaining  the  echo  fluctuations  with  360°  of  rotation),  The  other 
curves  represent  foam  spheres  coated  with  the  chaff  elements.  Each 
figure  presents  two  such  curves,  for  two  360°  cuts  about  the  sphere, 
each  labelled  with  the  curve  average  in  x2. 

The  chaff  elements  were  applied  by  sprinkling  them  randomly  upon 
a sphere  made  tacky  with  a spray  solvent.  The  aluminum  strip  chaff 
density  was  quite  low  - on  the  order  of  a 100  elements  distributed 
over  the  whole  surface.  (A  surface  density  of  about  0.5  dipole/x2.) 
They  were  1.5  cm  long,  implying  resonance  of  an  individual  dipole  at 
about  9.5  GHz.  Because  so  few  elements  touched,  the  sequence  of 
curves  (Figs.  113-116)  show  a resonance  effect  about  this  same 
frequency.  The  average  echo  at  resonance  (9.53  GHz)  was  on  the 
order  of  6.6x2,  about  equal  to  the  cross  section  of  a solid  metal 
sphere.  It's  also  about  equal  to  50  (i.e.,  one  half  the  total 
number  of  dipoles)  times  the  tumble  average  cross  section  of  a 
single  dipole  at  resonance,  giving  the  impression  that  the  front 
hemisphere  looks  almost  like  a solid  metal  hemisphere,  shielding 
the  elements  on  the  back  hemisphere.  A short  effort  (described 
in  a monthly  letter  to  the  sponsor)  was  devoted  to  investigating 
this  shielding  effect,  but  results  were  inconclusive. 

G,  The  Aircraft-Chaff -Tracker 
Interaction  Problem 

During  the  last  mcnth  of  the  contract,  the  sponsor  supported 
an  effort  to  computer-simulate  the  interaction  of  a combined  aircraft- 
chaff  cloud  target  with  a split-gate  missile  tracking  radar.  Because 
the  research  effort  is  concurrent  with  the  writing  of  this  final 
report,  only  its  general  outline  is  described  here.  Details  are 
presented  in  Appendix  G. 

A computer  software  routine  has  been  developed  which 
presents  on  a CRT  the  simulated  aircraft  radar  plot  of  both  the 
PPI  indicator  and  a height  finding  indicator.  Relative  orienta- 
tion of  both  aircraft  and  missile  are  displayed  as  a visual  aid. 
Evasive  aircraft  maneuvers  in  all  three  dimensions  and  in  time 
incorporating  preselected  aircraft  response  characteristics  (due 
to  inertia  and  stress  limitations)  can  _ controlled  by  the  operator. 
Chaff  clouds  are  deployed  at  will  by  action  of  the  operator.  The 
missile  radar,  incorporating  either  a split-gate  range  tracker  or  a 
leading  edge  range  tracker  with  selected  gate  width  and  time  response, 
dictates  the  trajectory  of  the  missile  under  selected  time  response. 
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characteristics  of  the  angle  tracker  and  missile  inertial  system. 
(This  program  includes  a missile  velocity  increase  with  time  and 
variable  maneuverability  with  altitude  and  shift  of  its  center  of 
gravity  with  burn.)  Presently,  the  aircraft  presents  to  the  radar 
an  echo  composed  of  three  Gaussian  pulses  of  selected  durations 
and  amplitudes.  Also,  deployed  chaff  clouds  remaiv  fixed  in  space 
(but  fall  behind  the  aircraft  as  the  aircraft  moves  ahead)  and 
present  to  the  tracker  an  echo  which  remains  constant  in  time  and 
aspect.  The  integrated  radar  signal  returned  from  the  aircraft 
and  chaff  clouds,  if  any  are  present,  is  calculated  as  a function 
of  time  and  relative  missile  position  and  compared  with  an  assumed 
thermal  noise  signal.  If  the  resulting  signal-to-noise  ratio  dips 
below  a selected  threshold,  break-lock  conditions  apply  and  the 
missile  continues  on  a ballistic  flight.  Presently,  a numerical 
printout  is  made  of  the  time-space-S/N  history  of  assumed  tactical 
manuevers.  This  is  difficult  to  interpret  at  a glance,  so  some 
consideration  is  being  given  tc  a graphical  plot  of  the  same  data 
so  that  successful  tactics  can  be  discerned  and  modified  easily 
and  quickly.  Also  the  data  will  be  taped  for  later  retrieval  and 
analysis.  A sketch  of  this  work  is  given  in  Appendix  G. 

Ultimately,  the  success  of  the  effort  described  to  simulate 
the  radar  interaction  problem  depends  upon  the  validity  of  the 
input  data,  i.e.,  good  radar  echo  from  aircraft  and  chaff  clouds 
as  functions  of  aspect  and  time,  accurate  dynamic  response  char- 
acteristics of  the  aircraft  and  missile  and  of  the  radar,  and 
realistic  tactical  maneuvers.  It  is  toward  this  goal  that  the 
present  chaff  contract  and  complementary  ones  are  directed. 
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cross  section  vs  360°  of  rotation  of  1.5  cm  A*  chaff  on  4"  foam  sphere. 


Figure  115,  Radar  cross  section  vs  360°  of  rotation  of  1.5  cm  A*,  chaff  on  4"  foam  sphere. 


Figure  116.  Radar  cross  section  vs  360°  of  rotation  of  1.5  cm  Aa  chaff  on  4"  foam  sphere 


III.  DISCUSSION 


Using  the  frozen  model  of  a chaff  cloud  together  with  an  i 

experimentally  verified  computer  routine  we  conclude  that  for 
clouds  of  up  to  200  coupled  resonant  dipoles,  the  backscattering 
cross  section  is,  on  the  average,  reduced  from  that  predicted  by 
uncoupled  theory  when  the  average  dipole  spacing  falls  below  2 
wavelengths.  It  is  important  to  remind  the  reader  that  these  con- 
clusions are  based  upon  data  calculated  for  inhomogeneous  clouds, 
i.e.,  spherical  clouds  whose  dipole  number  density  varied  along  the 
radial  direction  according  to  a Gaussian  function.  The  array 
dipole  spacings  were  maximum  at  the  center  of  the  cloud  and  equal 
to  about  1/3  those  of  the  average  dipole  spacings  defined  and  used 
here.  Dipole  orientations  were  always  assumed  equally  likely. 

Using  data  gathered  for  all  such  clouds  containing  up  to  30  dipoles, 

the  ratios  of  the  average  backscattering  cross  section  calculated  with 

coupling  to  that  calculated  without  coupling  are  summarized  in  Fig.  119 

for  average  dipole  spacings  down  to  0.5  wavelengths.  It  appears  that  at 

an  average  spacing  of  about  0.4  wavelengths  the  average  radar  return  can 

be  expected  to  be  reduced  about  3 dB  by  coupling  effects.  We  have  not 

included  spacings  smaller  than  0.5  because  approximations  concerning 

the  coupling  terms  in  the  computer  routine  come  into  question  beyond 

this  point.  More  exact  relations  are  available  if  needed  and  are 

discussed  in  this  report  (see  below),  but  they  require  more  time  and 

expense  to  implement  on  the  computer.  Moreover,  closer  spacings  in-  < 

crease  the  probability  that  more  and  more  dipoles  touch,  a feature 

which  can  be  incorporated  into  the  computer  but  not  without  some  en- 

cumberance.  . 

Although  less  data  were  gathered  for  bistatic  angles  up  to  135°  I 

(all  of  it  experimental),  both  same-sense  and  crossed-sense  linear 
polarizations  showed  trends  similar  to  backscatter  - closer  average 
spacings  effected  reduced  cross  sections.  In  addition,  several  fre- 
quency runs  by  computer  showed  that  even  at  the  smallest  average 
spacing  of  0.5  wavelength  the  dipole  resonance  frequency  remains  , 

essentially  unchanged  from  the  free  space  resonance  frequency.  For 
the  spacings  investigated,  apparently  the  loading  effects  on  a typical 
dipole  in  the  cloud  due  to  all  of  its  neighbors  essentially  influence 
only  the  amplitude  of  the  current  and  not  its  shape,  thereby  causing 
reduced  scatter  but  maintaining  about  the  same  resonance  frequency. 

Thus,  we  conclude  that  for  average  spacings  down  to  0.5X  ('v  8 dipoles/ 

*3)  each  chaff  element  should  be  cut  to  its  free-space  resonant  length 
to  achieve  best  performance  from  the  cloud. 

In  additional  scattering  measurements,  some  effect  was  devoted 
to  an  experimental  evaluation  of  the  extinction  through  a cloud  of 
dipoles,  averaged  over  time  as  the  dipoles  were  set  into  motion.  In 
this  report  curves  are  presented  of  the  insertion  loss  incurred  by  the 
presence  of  the  dipoles  as  functions  of  depth  and  for  several  densities. 
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i decrease  in  average  backscattering  cross  section  due  to  coupling  for  a range 
average  dipole  spacings  (Gaussian  density  distribution  assumed). 


1 


. 


A table  summarizing  the  extinction  rates  is  given  on  page  165.  These 
rates  indicate  a rather  rapid  extinction  of  energy  as  the  wave  proceeds 
into  the  cloud,  even  for  rather  tenuous  clouds.  Thus,  if  one  is  to 
design  efficient  chaff  clouds,  i.e.,  place  the  chaff  dipoles  where  they 
will  create  the  most  effective  echo,  it  is  important  to  account  for  the 
effect  of  extinction  and  to  predict  it.  Other  experiments  were 
performed  to  obtain  backscattering  patterns  for  a range  of  frequencies 
of  foam  spheres  covered  with  aluminum  and  glass-chaff.  The  patterns 
show  that  at  the  resonance  frequency  of  the  individual  dipoles,  the 
sphere  displays  an  average  cross  section  essentially  the  same  as 
that  of  conducting  sphere  of  the  same  size,  even  when  the  dipoles  are 
rather  sparsely  distributed  over  the  sphere  surface. 

A study  was  made  of  clouds  with  dipoles  spaced  on  the  average  less 
than  0.5a  - down  to  0.  125 A - to  investigate  the  accuracy  of  the  two- 
segment  model  employed  in  almost  all  the  cases  discussed  here.  It  was 
found  that  the  2-segment  model  appeared  satisfactory  down  to  average 
spacings  of  0.25A  if  an  exact  (rather  than  a 12-point  Gaussian)  in- 
tegration was  employed  to  find  the  mutual  impedances.  A penalty  of  a 
60%  increase  in  calculation  time  was  incurred,  however.  For  average 
spacings  as  small  as  0.125a,  even  a four  segment  model  with  exact 
integration  did  not  yield  sufficiently  stable  results.  Thus,  the 
programs  presented  in  this  report  are  not  considered  reliable  for  in- 
homogeneous clouds  with  average  spacings  less  than  0.25A.  Of  course, 
the  programs  can  easily  be  modified  to  increase  segmentation  but  the 
resulting  consumption  of  rapid-access  memory  becomes  intolerable. 

A small  amount  of  data  were  calculated  for  cTouds  containing  two 
chaff  lengths  and  the  results  show  the  same  effect  of  coupling  as  was 
observed  with  single  length  chaff.  It  appears  though  that  the  elements 
which  have  a lower  tumble  average  cross  section  (because  they  are  anti- 
resonant) are  less  influenced  by  mutual  coupling.  Not  enough  data  were 
accumulated  to  give  an  empirical  mixture  rule  to  estimate  the  average 
cross  section  of  any  combination  of  any  two  element  lengths. 

In  order  to  extend  our  capability  to  calculate  radar  cross  sections 
of  clouds  with  mure  than  200  dipoles  without  exceeding  the  fast  access 
memory  capabilities  of  even  the  largest  computers  two  investigations 
were  initiated.  One  of  the  use  of  the  sparse  matrix  technique.  This 
method  takes  into  account  the  physical  fact  that  dipoles  which  are 
electrically  far  apart  in  the  cloud  are  only  weakly  coupled;  this  in 
turn  implies  that  many  elements  of  the  impedance  matrix  relating  the 
fields  and  currents  are  almost  null.  If  such  elements  are  arbitrarily 
set  to  zero  and  their  number  exceeds  about  80%  of  the  total  number  of 
matrix  elements,  sparse  matrix  algorithms  may  be  applied  which  effect 
large  savings  in  computer  memory  - so  much  so  that  matrices  of  much 
larger  order  than  normally  possible  can  be  inverted.  This  method  has 
been  applied  to  the  chaff  scattering  problem  with  some  success,  but 
it  was  found  to  be  more  time  consuming  than  expected,  particularly  in 
the  matrix  reordering  portion  of  the  algorithm.  Also,  the  arbitrary 
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sparsing  of  the  impedance  matrix  causes  approximations  which  make  a 
study  of  the  extinction  through  the  cloud  impossible  using  this 
technique.  A second  method  which  does  not  suffer  from  this  latter 
disadvantage  is  the  iterative  scatter  technique  which  assumes  initial 
currents  on  the  dipoles  as  if  they  were  uncoupled  and  updates  all 
these  currents  in  successive  steps  corresponding  to  what  might  be 
thought  of  as  successive  orders  of  inter-dipole  scatter.  We  have 
found  the  successive  overrelaxation  (SOR)  method  together  with  the 
Gauss-Seidel  algorithm  to  be  the  most  successful  iterative  method  we 
have  used  on  clouds  of  resonant  wires.  (It  was  found  to  be  less  success- 
ful on  solid  obstacles.)  Details  will  be  found  in  a separate  technical 
report  [38];  in  this  report  we  show  scattering  results  for  clouds 
containing  1000  dipoles  calculated  using  SOR.  Some  check  cases  are 
also  presented  to  validate  the  method.  Although,  like  the  sparse 
matrix  technique,  the  iterative  method  is  time  consuming,  it  does 
permit  calculation  of  scattering  data  for  much  larger  clouds  than 
can  be  conveniently  handled  any  other  way,  and  should  yield  accurate 
extinction  data. 

One  other  topic  which  was  investigated  briefly  during  this 
contract  period  was  the  analysis  of  the  aircraft-tracker 
radar  interaction  in  the  presence  of  chaff.  Detailed  results  will 
be  found  in  a separate  technical  report  [62]. 

Computer  programs  used  to  calculate  the  data  generated  for  this 
contract  are  given  in  appendices. 
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IV.  RECOMMENDATIONS  FOR  FUTURE  EFFORT 

(1)  We  have  observed  that  as  closer  and  closer  spacings  between 
dipoles  are  assumed,  the  current  distribution  on  each  dipole  is  not 
only  changed  in  amplitude,  but  also  in  shape  along  the  length  of  the 
dipole.  To  represent  this  distorted  shape  requires  more  than  a two- 
segment  model  of  the  dipole  if  a piecewise  sinusoidal  basis  is  used. 

We  suggest  the  use  of  two  basis  functions,  each  defined  over  the 
entire  length  of  the  dipole,  one  being  even,  the  other  odd  with 
respect  to  the  dipole  center.  The  even  function  appears  as  a cosine 
function  blunted  at  the  ends  while  the  odd  function  appears  as  a sine 
function  whose  peaks  are  shifted  toward  the  dipole  extremeties.  We 
feel  that  such  basis  functions  should  be  sufficient  to  account  for  the 
current  distortions  due  to  the  influence  of  nearby  neighbors  without 
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increasing  the  order  of  the  matrix  equations.  How  much  more  dense  3 
this  technique  will  allow  the  clouds  to  become  beyond  the  8 dipoles/AJ 
number  is  not  known. 

(2)  We  know  that  for  extremely  dense  clouds  where  many  dipoles  are 
touching,  the  method  of  moments  is  not  a viable  technique.  The  cloud 
appears  in  some  sense  as  a solid  body  of  conducting  material,  whose 
surface  is  almost  rur-like  and  changing  with  time.  We  suggest  that 
such  a surface  be  modelled  as  a random  surface  with  only  incoherent 
scatter  and  for  chosen  cloud  shapes,  the  calculated  echo  patterns  be 
compared  with  experimentally  derived  patterns. 

(3)  Beyond  the  problem  of  dense  clouds  is  the  fact  that  most  chaff 
clouds  contain  dipoles  of  various  lengths  to  meet  threats  over  a range 
of  frequencies . The  low  frequencies  present  no  new  problems,  but  at 
the  higher  frequencies,  those  dipoles  resonant  at  low  frequencies  be- 
come electrically  long  and  require  many  segments  (or  modes)  to 
adequately  describe  the  currents  induced  on  them.  This  enlarges  the 
matrix  to  sizes  which  cannot  be  handled  by  computers.  Thus,  we 
suggest  the  use  cif  basis  functions  which  are  travelling  waves  rather 
than  standing  waves  and  thereby  reduce  the  number  needed.  The 
longer  wires  would  of  necessity  be  assumed  straight,  uncoupled  to 
each  other  and  to  the  short  elements. 

(4)  The  computer  simulation  of  an  aircraft-missile  intercept  problem 
in  the  presence  of  chaff  should  be  continued.  Better  models  should 

be  developed  for  the  echo  return  from  a typical  aircraft  as  a function 
of  its  aspect  with  respect  to  the  incident  wave.  Realistic  radar 
models,  including  effects  of  doppler  and  angle  tracking  should  be 
incorporated.  And,  probably  most  difficult,  more  accurate  chaff 
cloud  returns  should  be  simulated. 


■ 1 1 ' " 1 " ' ' I"  WLMg^iM  ig.yjn.Mi.  -1; 1 . VvwrJi,r>«.'-«t 


APPENDIX  A 

STATISTICAL  ANALYSIS  EMPLOYED  IN  THIS  REPORT 


A.  Definitions 


We  assume  a frozen  model  for  a chaff  cloud  and  shall  denote  the  back- 
scattering  cross  section  of  the  mth  cloud  in  the  ensemble  illuminated  from 
an  angle  0,  by  am(e)  often  leaving  the  0-dependence  implicit  for  convenience 
Averages  with  respect  to  angle  0 (here  called  spatial  averages)  will  be 
denoted  by  Poisson  brackets,  < >,  while  ensemble  averages  over  a set  of 
clouds  will  be  denoted  by  the  overbar, 

It  can  be  shown13,14  that  the  backscattering  cross  section  am(0) 
of  the  mth  cloud  in  the  ensemble  of  clouds  forming  the  frozen  model, 
under  the  assumption  of  no  coupling  among  dipoles,  follows  an  ex- 
ponential probability  density  function,*  sketched  in  Fig.  I-la, 
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where  <om>  is  the  spatial  average  of  om(e)  over  all  0 given  by 


(1-2) 
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Evidence  that  indeed  Eq.  (1-1)  is  valid  is  presented  in  Ref.  11  for 
clouds  of  up  to  30  dipoles  spaced  on  the  average  by  two  wavelengths 
(negligible  coupling  case).  There  also  exist  some  actual  radar  chaff 
measurements  which  indicate  an  exponential  distribution  of  back- 
scattering  cross  section.15 


(1-3) 


The  standard  deviation15  of  oAe)  is  by  definition 
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s =l4(o  - <a  >)2>  = 

m r m m 


(o_(0)  - <a  >)  de  = <0  > 

' m'  ' m J m 


and  the  variance  of  am(e)  is  equal  to  s„. 

m m 

The  cumulative  probability  function  associated  with  0 is  of 
interest  and  sketched  in  Fig.  I-lb,  is 


*It  can  be  shown  that  the  exponential  probability  density  function  is 
strictly  applicable  only  if  the  cloud  density  is  uniform,  which  in  the 
present  case  is  not  true.  However,  for  the  clouds  considered  here,  it 
is  a very  good  approximation. 
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This  function,  evaluated  at,  say  = a^,  gives  the  fraction  of 
all  possible  values  of  am  which  lie  in  the  range,  0 < am  < am. 
Special  values  of  ai  are  given  names  which  we  will  refer  to  later. 

“ y5»,°m  = °m  1/5  is  called  the  20%  or  first 
quintile,  if  Pm(om)  = 1/2,  am  - am  y 2 is  called  the  50%  or 


..  'm}°nW  ~ am  = am  1/2  >-"c  >>u»  u 1 

median  (as  distinct  from  the  mean  or  average  value  we  have  symbolized 

quintTle!  ™ ‘ 4/5,  = °m  4/5  1s  ca,,ed  the  8M  or  fourth 
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Figure  1-1.  Sketches  of  the  exponential  probability  density  function  and 
corresponding  cumulative  probability  function  for  the 
backscattering  cross  section  of  a chaff  cloud. 
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In  the  frozen  cloud  model,  many  different  sample  clouds  are 
generated  (each  one,  of  course,  with  the  same  number  of  dipoles 
spaced  on  the  average  the  same).  If  the  number  of  such  clouds  is 
M >>  1 , we  obtain  M sample  functions  om(e),  each  one  representing 
the  backscattering  cross  section  as  a function  of  look  angle  e of 
the  mth  cloud  in  the  ensemble,  where  1 1 m 1 M.  Since  the  spatial 
average  cross  section  <om>  will  in  general  differ  for  each  m we 
obtain  a distribution  of  M values  of  <om>.  If  M is  large  enough, 
we  can  obtain  a relative  frequency  histograml7  of  <om>  which  may 
be  fitted  to  a Gaussian  probability  density  function  qmean(<0m>) 
since  the  means  of  the  exponential  process  are  Gaussianly  distributed. 
If,  for  convenience,  the  symbol  <a>  is  used  in  place  of  <om>,  we 
depict  the  relative  frequency  histogram  of  <a>  by  a bar  graph  and 
the  Gaussian  probability  density  function  of  the  sampling  distribution 
by  a smooth  curve  as  sketched  in  Fig.  1-2.  The  Gaussian  density 
function  18  is 
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where  <-7>  is  the  ensemble  mean  of  <q>  and  Smean  is  the  standard 
deviation  of  <q>.  On  an  ensemble  basis  they  may  be  expressed  as 
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The  mean  value  <q>  is  the  arithmetic  average  of  all  the  values  of  <q> 
(i.e.,  <qm>)  and  the  standard  deviation  (since  q(<o>)  is  Gaussian) 
determines  the  range  of  values,  (<q>  - s^an)  < (<o>)  < (<q>  + s^an), 
between  which  lie  68.27%  of  all  the  possible  values  of  <q>  (i.e.,  <om>). 
The  two  curves  in  Fig.  1-2  both  are  normalized  to  unit  area  and  the  one 
may  be  fitted  to  the  other  by,  for  example,  a chi-square  test. 19  Of 
course,  since  <q>  cannot  be  negative,  the  fit  of  a Guassian  distri- 
bution (which  admits  negative  values)  can  be  accomplished  only  in  the 
region  of  <q>  values  about  the  <q>  value. 

In  a manner  very  similar  to  that  for  treating  <q>,  we  may  fit 
Gaussian  curves  to  histograms  of  qm  1/5,  qm  1/2*  °m  4/5  (using  the 
simplified  symbols,  q^g,  oy2'  a4/5/» 


Figure 


(1-8) 


(1-9) 


(1-10) 


1-2.  Sketches  of  a histogram  and  associated  Gaussian 
probability  distribution  of  spatial  average 
cross  sections  of  frozen  chaff  clouds. 


(g1/5~gl/5)2 


q,/5h/5>  ■ ^ 


2 s 


1/5 


‘1/5 


(°l/2~ql/2 ) 


2 s 


T 

1/2 


n/2 


(g4/5~c4/5^ 


1 


2s 


q4/5(^4/S>  = ^ 


4/5 


*4/5 


where  the  mean  and  standard  deviation  of  o, /5,  for  example,  taken  on 
an  ensemble  basis,  are 


.00 

d-n)  o1/5  = a1/5  qi/5(°1/5)da1/5) 


(I“12)  Sl/5  = (al/5“al/5)  E j_m  (ol/5"°l/5)2  ql/5(ol/5)dol/5' 
Similar  expressions  may  be  used  for  o]/2,  s]/2,  o4/5,  and  s4/5. 

Once  a value  for  <o>  has  been  obtained,  we  hypothesize  that 
this  value  may  be  used  in  Eqs.  (1-1)  and  (1-2)  to  obtain  the 
probability  density  function  and  cumulative  probability  of  the 
backscattering  cross  section  a of  the  frozen  model,  even  in  the 
presence  of  coupling, 
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If  these  functions  indeed  do  characterize  the  frozen  model  then 
it  should  be  true  that 


( 1-1 5a ) 

P(oy5 ) = 0.2, 

( I -1 5b ) 

P^l/g)  = 0.5  , 

( I— 1 5c) 

P (ct4/5 ) = 0,8  . 

One  can  test  the  data  to  see  if  equalities  (1-15)  are  approximately 
true,  in  which  case  we  have  some  assurance  that  Eq.  (1-13)  is  valid 
for  coupled  clouds. 
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We  considered  the  following  reasoning  to  obtain  one  other 
indicator  that  Eq.  (1-13)  is  valid.  The  standard  deviation  of 
found  from  Eq.  (1-13)  to  be 
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This  standard  deviation  of  a should  be  related  to  the  standard 
deviation  Snejm  of  the  sampling  distribution  of  means  by  the 

relationship™ 
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where  the  numbers  Np  and  Ns  are  defined  as  the  population  and  sample 
size,  respectively,  and  may  be  obtained  in  our  case  as  follows. 


If,  in  the  frozen  model,  there  are  M clouds,  each  viewed  at 
512  angles  with  two  polarizations,  then  the  number  of  pieces  of 
backscattering  data,  called  the  population,  is  Np  = 1024M.  By 
sampling  each  cloud  at  512  look  angles  with  two  polarizations  and 
considering  these  data  as  independent,  we  form  2M  samples  of  size 
Ns  = 512  data  points  each.  However,  the  512  look  angles  are 
probably  not  independent,  i.e.,  we  have  oversampled  om(e).  To 
obtain  an  estimate  of  the  number  of  independent  samples,  we  observe 
the  highest  frequency  in  the  spectrum  W(N,d/x)  (discussed  below) 
and  consider  the  sample  size  to  be  Ns  = 2W  (N,  d/x).  Using  these 
values  for  Np  and  Ns  and  Smean  as  obtained  from  qmean(<0>)»  Fq-  (1-17) 
gives_a  value  s % s^an  2w  which  may  be  compared  with  the  value 
s = <o>  of  Eq.  (1-16).  We  applied  the  above  numbers  to  Eq.  (1-17) 
and  did  not  arrive  at  relations  between  s and  Smean  which  were 
consistent  with  Eq.  (1-16).  We  can  only  conclude  that  the  above 
method  for  estimating  sample  size  is  invalid  probably  due  to  the 
inhomogeneity  of  the  population  data  from  cloud  to  cloud. 

Another  parameter  which  may  be  of  use  in  characterizing  the 
frozen  cloud  model  is  the  spatial  frequency  spectrum  of  the  back- 
scattering  cross  section.  If  om(e)  is  the  backscattering  cross 
section  of  the  mth  cloud  in  the  frozen  model,  then  we  define  Fm(a)) 
as  the  Fourier  transform  of  one  period  of  om(e),  0ie<360°,  where 
u>  is  the  spatial  spectral  variable  (in  say,  Hz/degrees  of  e). 

A typical  Fm(u))  might  appear  as  sketched  in  Fig.  1-3,  where 
W|jj  is  the  highest  frequency  in  the  spectrum.  One  finds  that  Wm 
varies  with  N,  the  number  of  dipoles  in  a cloud,  and  d/x,  the 
average  spacing  between  dipoles,  so  we  signify  this  dependence 
by  writing  Wm(N,  d/x).  In  addition,  one  finds  that  for  a fixed 
(N,  d/x)  pair,  different  members  of  the  ensemble  of  clouds,  i.e.. 
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different  values  for  1 £ m 1 M,  yield  slightly  different  Wm(N,  d/A). 

If  we  denote  by  W(N,  d/A)  the  average  of  these  values  over  22 
different  clouds,  we  can  derive  Table  I.  In  this  table,  W(N,  d/A) 
appear  in  the  upper  triangles,  while  in  the  lower  triangles  appear 
the  values  of  4<S(N,d/A)/A;  i.e.,  diameters  (in  wavelengths)  of  spheres 
encompassing  95%  of  the  dipoles  in  a typical  cloud  associated  with  the 
pair  (N,  d/A),  If  the  parallel  dipole  scatterers  are  assumed  to  exist 
at  the  extremeties  of  these  diameters,  then  frequency  W'(N,  d/A)  can  be 
calculated  on  the  basis  of  the  beanwidth  of  the  broadside  lobe  ac- 
cording to 

W'(N,  f ) = - 180 


.-11  A 
sin  2 * 46 


Both  W(N,  d/A)  and  W'(N,  d/A)  are  plotted  in  Fig.  1-4.  The  2-dipole 
model  appears  to  predict  values  for  W(N,  d/A)  which  are  too  low  and  do 
not  decrease  rapidly  enough  with  decrease  in  N,  but  considering  the 
simplicity  of  the  model,  the  comparisons  are  not  bad. 


Figure  1-3.  Sketch  of  a typical  spatial  frequency  spectrum 
of  a frozen  chaff  cloud. 

B.  Statistical  Analysis  of  Backscatterinq  Data 

A large  amount  of  calculated  backscattering  data,  based  on  the 
frozen  model,  have  been  obtained  for  several  cases.  To  examine  the 
properties  of  these  data,  statistical  methods  must  be  employed. 

The  usual  procedures  for  dealing  with  this  kind  of  statistical 
problem  are  as  follows: 

1.  Data  are  first  classified  into  small  intervals  and  by 
counting  the  relative  frequencies  of  occurance  in  each  interval, 
a histogram  can  be  drawn.  By  inspecting  the  histogram,  it  is  then 
possible  to  select  a suitable  mathematical  model,  namely,  the 
frequency  distribution  function.  The  unknown  parameters  are  then 
estimated  by  the  Maximum  Likelihood  Method. 
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Figure  1-4.  The  highest  spatial  frequency  Wn  in  the  spectrum 
of  a frozen  chaff  cloud,  as  function  of  N and  d/x. 

The  approximant  is  derived  as  discussed  in  the  text 
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2.  The  reasonableness  of  the  mathematical  model  can  be  checked 
by  the  Chi-Square  Test.1'-}  Basically,  the  quantity 

k (o.-e.)2 

X -V—’ 

1=1  1 


where  Oj,  ej  are  the  observed  and  expected  frequencies  respectively, 
is  compared  to  a xo  variable  with  v degree  of  freedom.  This  serves 
as  the  criterion  for  the  goodness  of  fit. 

3.  Once  the  assumption  of  the  model  is  justified,  our  interest 
is  in  the  confidence  limits  of  the  parameters.  This  gives  some  idea 
of  the  expected  variation  of  the  parameters  of  interest.  Given  the 
size  of  the  confidence  interval,  it  is  then  possible  to  determine  the 
number  of  data  points  sufficient  to  describe  the  statistical  behavior 
of  the  cloud. 

To  illustrate  the  technique,  we  analyze  the  data  obtained  for  the 
case  N=30  dipoles,  d=2.0x  in  detail  here. 

Table  II  shows  the  spatial  average  backscattering  cross-section 
<am(0)>  for  m=l,  2,  •••,  80  clouds.  These  data  are  then  classified 
into  24  classes,  from  class  mark  2.0  to  6.8  with  interval  size  0.2. 

The  resultant  histogram  is  shown  in  Fig.  1-5.  The  syronetry  and 
skewness  of  the  histogram  suggests  that  the  data  are  likely  to  be 
Gaussian-distributed.  We  therefore  assume  that  <om(e)>  has  a 
Gaussian  distribution  with  mean  y and  variance  a2.  Since  these 
are  not  known  a priori,  they  must  be  estimated  from  the  data.  It 
can  be  shown19  that  the  maximum  likelihood  estimators  of  y and  a2 
are  given  by  the  sample  mean  <om(e)>  and  sample  variance  s2  . 

Thus,  m mean 


(<om(e)  -<om(e)>)< 
m m 


•Jz  IT  s 

mean 

80  <a  (e)> 

where  the  sample  mean  <am( 0 )>  = I — gg-  = 4.2798, 

m=l 

2 80  (<cr  (d)  — <0  ( 6 ) >2 

sample  variance  s = l — ^ — — = 0.288 

rean  m=1  79 

and  total  area  of  the  histogram  A = 16.0. 
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Figure  1-5. 


The  histogram  and  associated  Gaussian  probability  distribution 
of  the  spatial  averages  of  80  frozen  chaff  clouds  containing 
30  dipoles  each. 


Equation  (1-18)  is  also  plotted  in  Fig.  1-5.  Here  we  have  fit 
the  histogram  of  the  backscattering  data  to  a Gaussian  curve.  One  „ 
measure  of  fit  is  the  Chi-square  test  which  evaluates  the  deviation 

2 k (o-e,)2 


k 

= 1 
i=l 


ei 


between  the  observed  frequencies  oi  and  the  expected  frequencies  ei  in 
i-l,2,--*k  intervals.  The  expected  frequency  e^  is  obtained  by  in- 
tegrating the  area  under  the  curve  and  the  observed  frequency  oi  is 
obtained  by  counting  the  number  of  occurances  of  the  backscatterinq 
data  in  the  ith  interval.  The  results  are  shown  in  Table  III. 


In  computing  the  deviation  x » it  is  necessary  that  ei>5  and  k>5. 
Several  intervals  can  be  combined  until  the  above  condition  is  satisfi 
This  is  indicated  in  the  left  column  of  Table  III. 
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Calculations  show  that 


x2=  ? 


[4-5.351 


, (15-10.33)2  . (18-11. 68)2  . (10-11.521 
10.33  11.68  11.52 


= 10.7088 

2 

This  value  is  compared  with  a Xo  variable  with  =K-l-4  degrees 
of  freedom,  where  * is  the  number  of  parameters  that  the  interval 
probability  depends  upon;  since  qmean(<om(0)>)  depends  on  two 
unknown  parameters,  we  have  4=2  in  this  case. 

It  is  found  that  xo=12.592  with  v=6  for  a 5%  significant  level, 
and  since  < x^»  we  conclude  that  the  model  is  satisfactory. 

The  95%  confidence  interval  for  the  mean  is  given  by: 


(<am(3)>)  - 


, <om(e)>  + 


•«/  m-1 


= (4.1613,  4.3983) 


where  b can  be  obtained  from  the  Student-t[l9]  distribution  table. 
For  example,  b=l .96  for  m >30.  The  confidence  interval  of  the  mean 
is  then  given  by  L * 2bS/Jm-l , or  solving  for  m,  we  obtain: 


(1-19) 


m = 1 + 


#/• 


For  L=0.1  <om(e)>  = 0.42798,  Eq.  (1-19)  can  be  used  to  obtain  the 
value  of  m by  trial  and  error.  Assume  m=26,  b=2.056,  Eqs.  (1-19) 
gives  m = 26.  We  summarize  the  results  as  follows: 

1.  Evidence  is  shown  that  the  spatial  averages  are  Gaussian 
distributed. 

2.  The  mean  value  will  lie  inside  the  interval  (4.1613,  4.3983). 

3.  We  predict  that  95%  of  the  data  will  fall  in  the  interval 
(3.2050  , 5.3546)  in  the  long  run. 

4.  Only  26  clouds  are  needed  to  determine  the  statistical 
behavior  of  the  spatial  variation  of  the  Chaff  cloud  if 
the  size  of  the  confidence  interval  is  allowed  to  be  10% 
of  its  mean  value. 
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The  backscattering  data  obtained  for  the  cases  N=30  dipoles, 
d=0.5A  and  N=10  dipoles,  d=0.5X,  2. OX  were  treated  in  the  same  manner 
as  above.  80  clouds  for  each  of  these  cases  were  used  in  the  analysis. 

It  turns  out  that  in  all  cases,  the  spatial  averages  are  Gaussian 
distributed  to  a good  approximation.  The  results  of  the  analysis  are 
shown  in  Table  IV  and  in  Figs.  1-6  and  1-7. 

It  was  mentioned  in  Section  A that  the  backscattering  cross- 
section  <om(e)>  under  the  assumption  of  no  coupling  among  dipoles, 
follows  the  exponential  probability  density  function  of  Eq.  (1-13). 

If  the  exponential  density  function  also  holds  for  coupled  elements, 
then  Eq.  (I-15a),  (15b),  (15c)  should  be  approximately  true  even  for 
small  spacings  d/x.  We  now  want  to  show  that  this  is  indeed  the  case. 

Backscattering  data  were  obtained  for  4 cases,  namely,  N=30  dipoles, 
d=0.5X,  2. OX  and  N=1 0 dipoles,  d=0.5X,  2. OX  at  20%,  50%,  80%  levels. 
Again,  80  clouds  of  each  case  were  used  in  the  statistical  analysis. 

The  assumption  that  the  data  were  obtained  from  sampling  a Gaussian 
population  is  good  except  for  the  case  of  20%  level.  However,  it  is 
found  that  the  variance  in  these  cases  are  so  small  that  even  if  more 
clouds  are  included  in  the  analysis,  the  sample  mean  will  not  change 
significantly.  We  thus  include  them  for  comparison. 

The  20%,  50%  and  80%  levels  are  obtained  by  substituting 
into  Eq.  (1-14)  with  the  appropriate  value  of  <a>  used  and  in 
Table  IV  they  are  compared  with  the  value  obtained  for  forming 
histograms  and  approximating  these  with  Gaussian  distributions. 

The  same  results  are  shown  in  Fig.  1-8,  where  the  curves  are 
calculated  using  Eq.  (1-14)  and  dots  are  values  calculated  using 
histograms.  In  Fig.  1-8  our  additional  curve  for  N=50  dipoles 
d/X  = 2.0  is  given.  The  good  comparison  leads  us  to  conclude 
that  the  backscattering  cross  section,  even  with  severe  coupling 
effects,  appears  to  obey  the  exponential  distribution  when  the 
associated  value  of  mean  cross  section  <a>  is  incorporated. 
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Again,  80  clouds  of  each  case  were  used  in  the  statistical  analysis. 
The  assumption  that  the  data  were  obtained  from  sampling  a Gaussian 
population  is  good  except  for  the  case  of  20%  level.  However,  it  is 
found  that  the  variance  in  these  cases  are  so  small  that  even  if  more 
clouds  are  included  in  the  analysis,  the  sample  mean  will  not  change 
significantly.  We  thus  include  them  for  comparison. 

The  20%,  50%  and  80%  levels  are  obtained  by  substituting 
into  Eq.  (1-14)  with  the  appropriate  value  of  <o>  used  and  in 
Table  IV  they  are  compared  with  the  value  obtained  by  forming 
histograms  and  approximating  these  with  Gaussian  distributions. 

The  same  results  are  shown  in  Fig.  1-8,  where  the  curves  are 
calculated  using  Eq.  (1-14)  and  dots  are  values  calculated  using 
histograms.  The  good  comparison  leads  us  to  conclude  that  the 
backscattering  cross  section,  even  with  severe  coupling  effects, 
appears  to  obey  the  exponential  distribution  when  the  associated 
value  of  mean  cross  section  <o>  is  incorporated. 


TABLE  I - HIGHEST  SPECTRAL  FREQUENCIES 
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TABLE  II  - SPATIAL  AVERAGES  OF  80  CLOUDS 
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TABLE  III  - THE  DATA  OF  TABLE  II  CLASSIFIED  INTO  RELATIVE 
FREQUENCIES  OF  OCCURRENCE 
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Level 

Freq  Dist 
°i 

Theo  Freq 
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2.100 

0 

.00 

2.300 

0 

.01 

2.500 

0 

.03 

2.700 

2 

.09 

2.900 

0 

.28 

3.100 

V 

.72 

3.300 

c 

1.61 

3.500 

3 

3.14 
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4 

5.35 

3.900 

8 

7.96 

4.100 

15 

10.33 

4.300 

18 

11.68 

4.500 

10 

11.22 

4.700 

4 

9.91 

4.900 

7 

7.43 

5.100 

3 

4.86 

5.300 

2 

2.77 

5.500 

2 

1.38 
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0 

.60 
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0 

.23 
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0 

.07 
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0 
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0 
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0 
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TABLE  IV  - CUMULATIVE  PROBABILITY  VALUES 
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Figure  1-7.  Ensemble  average  backscatter  <a>  over  80  frozen  chaff  clouds  with 

average  spacing  d/x  = 0.5.  Two  cases  are  considered,  N = 10  dipoles 
and  N = 30  dipoles  as  indicated  by  the  heavy  dots.  The  heavy 
dashes  indicate  the  range  containing  68%  of  the  individual  spatial 
averages  (within  one  standard  deviation  either  side  of  <a>)  and  the 
light  dashes  indicate  the  range  containing  95%  of  the  individual 
spatial  averages  (within  two  standard  deviations  either  side  of 
<o> ) . The  straight  line  represents  uncoupled  dipoles. 
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APPENDIX  B 

REACTION  MATCHING  IN  ELECTROMAGNETIC  PROBLEMS 


The  objective  of  this  work  is  to  determine  the  electro- 
magnetic scattering  properties  of  large  (random)  clouds  of 
perfectly  conducting  wires  (dipoles)  illuminated  by  a mono- 
chromatic plane  wave.  The  emphasis  is  on  applying  an 
integral  equation  solution  to  this  problem  for  those  cases 
where  the  number  of  volume  density  of  dipoles  is  large  ( 1000 
dipoles,  8 dipoles  A2)  and  the  mutual  couplings  among  all 
dipoles  must  be  taken  into  account.  The  purpose  of  this  appendix 
is  to  review  the  reaction  [21]  technique  for  developing  an  in- 
tegral equation  for  the 'currents  induced  on  these  dipoles  and 
to  consider  the  transformation  of^this  integral  formulation  via 
Moment  Methods  [22]  to  a system  of  algebraic  equations  more 
suitable  for  numerical  solution  by  digital  computer. 


One  measure  often  used  to  characterize  scattering  properties 
is  radar  cross  section  or  echo  area  a defined  by 


(II-l) 


lim  4-rrR 
R-*» 


where  Ei  is  the  electric  field  intensity  of  an  incident  plane 
wave  of  fixed  polarization  arriving  from  a particular  direction 
(say  o0 ,4>0)  and  Es  is  the  electric  field  intensity  of  the  scattered 
field  a large  distance  R from  the  obstacle  in  an  arbitrary  direction 
(e ,<|>).  The  quantity  hr  is  a unit  vector  spacifying  the?  direction 
of  the  vector  effective  height  of  the  receiving  antenna  which 
fixes  the  polarization  component  of  the  scattered  field  inter- 
cepted by  this  antenna.  The  reader  is  referred  to  the  work  by 
Kennaugh  [23]  for  a complete  discussion  of  the  characterization 
of  polarization  properties  for  arbitrary  scatterers. 

The  units  for  a in  the  MKS  system  are  meters2  and  radar 
cross  section  obviously  represents  an  area.  More  specifically, 
o is  the  area  normal  to  the  incoming  plane  wave  which  would 
intercept  enough  power  from  the  incident  fields  so  that  if  this 
power  were  reradiated  isotropically  the  power  intercepted  by  the 
receiving  antenna  would  be  identical  to  that  caused  by  the  obstacle 
itself.  Figure  II-l  illustrates  the  two  basic  types  of  radar 
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(a)  Bistatic  Configuration 
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Figure  II-*-!,  Scattering  cross-section  configurations 


cross  section  measurements;  bi static  cross  section  where  trans- 
mitter and  receiver  are  separateed  by  angle  b^O,  and  monos tatic 
cross  section  where  transmitter  and  receiver  are  coincident,  3=  0. 
Monostatic  cross  section  is  commonly  referred  to  as  backscatter 
cross  section  and  this  terminology  will  be  adhered  to  in  all 
following  discussions. 


Scatterinc 


Perfectly  Conducting  Bodies 


Calculation  of  the  scattered  electric  field  appearing  in 
Eq.  ( I I -1 ) normally  requires  knowledge  of  the  "secondary  sources" 
induced  in  or  on  the  scattering  obstacle.  A perfectly  conducting 
obstacle  will  obviously  have  only  a secondary  source  of  the 
electric  type  induced  on  its  surface  and  an  integral  equation  for 
this  surface  distribution  can  be  derived  by  applying  the  usual 
boundary  conditions  and  the  "zero  reaction"  theorem  of  Rumsey 
[21].  A detailed  treatment  of  this  approach  is  given  by 
Richmond  [24]  and  is  summarized  here. 

Consider  the  basic  geometry  for  the  problem  shown  in  Fig.  I I -2. 
The  arbitrary  metallic  scatterer  is  located  about  the  origin  0 in 
a right  hand  coordinate  system_and  the  primary  electric  and 
magnetic  source  distributions  of  finite  extent,  and  with 

eJwt  time  dependence,  are  located  by  position  vector  R,  R here  is 
assumed  large  (R-x*>),  thus  assuring  that  the  free  space  fields  of 
Ji,Mi,  in  the  absence  of  the  scatterer,  produce  a plane  wave  in 
the  vicinity  Qf  0.  For  convenience  consider  these  plane  wave 
fields  to  be  e polarized  with  components  given  by 


( I I— 2) 


(II-3) 


jk  R 

E . = e 0 § 


H = — — e 

1 no 


where  ^ = 120-rr  is  the  free  space  wave  impedance  and  k0  = 
the  free  space  propagation  constant.  ' 


y.e  is 
o o 


The  surface  of  the  perfectly  conducting  obstacle,  defined  by 
S in  Fig.  1 1-2 , separates  the  interior  source  free  region  V from 
the  exterior  region  containing  Jj,M-j,  Consider  the  total  fields 
in  the  presence  of  the  scattering  obstacle.  These  fields  are 
(E,H)  outside  V and  (0,0)_inspde  V and  are  the  superposition  of 
the  free  space  fields  of  J-f  ,M-j  and  the  free  space  field  of  new 
secondary  source  Js  on  S.  Js  here  is  precisely,  the  surface  con- 
duction current  distribution  induced  on  S by  (E-j,H-j)._  It  is  con- 
venient at  this  point  to  define  the  scattered  fields  Es.Hs  in  terms 
of  the  difference  fields  given  by 
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Figure  I I -2.  Arbitrary  metallic  scatterer  in  presence 
of  primary  sources, 


( I 1—4)  Es  = E - E. 


( I 1—5) 


Hs  , H - H. 


From  this  definition  of  fields.*,  the  surface  distribution  radiating 
in  free  space,  must  generate  (ES,HS)  outside  V and  ( -E-j  ,-Hi ) inside 
V • Js  can  be  written  in  terms  of  the  boundary  conditions  on  S (a 
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where  n is  taken  to  be  the  unit_outward_normal . The  equivalent 
problem  stated  in  terms  of  ( Xj  ,M-j ) and  Js  radiating  in  free 
space  is  illustrated  in  Fig.  I I -3. 
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Figure  II-3. 


Equivalent  problem. 
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The  term  "reaction"  was  first  introduced  by  Rumsey  to  describe 
certain  measurable  effects  between_sources  and  their  fields. 
Consider  two  sources  (Ja,Ra)  and  iPb*Mb)  of  finite  extent  and 
radiating  fields  (Ea,Ha)  and  (Ep.Hb),  respectively.  Also  con- 
sider the  region  of  space  containing  these  sources  and  their 
fields  to  be  isotropic  but  not  necessarily  homogeneous.  The 
reaction  of  source  b on  source  a,  denoted  by  <a,b>  (mutual 
reaction),  is  defined  by  the  scalar  quantity 


(I 1-7) 


<a,b> 


Jja  (Ta.rb  - CT-fyda1 


where  the  region  of  integration  in  this  case,  is  over  the  "a" 
sources  (e.g.,  volumetric,  surface,  or  filamentary).  In  reciprocity 
media  the  reciprocity  theorem  of  Carson  [25]  can  be  applied  to  Eq. 

( I 1-7)  to  show  equality  of  mutual  reactions;  i.e., 


( I 1-8)  <a,b>  = <b,a>  , 
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Sources  can  also  be  reacted  with  themselves  to  yield  "self- 
reactions" denoted  <a,a<  or  <b,b>. 


Application  of  the  reaction  concept  to  the  present  scattering 
problem  leads  readily  to  the  required  integral  equation  formulation 
for  the  unknown  surface  current  Js  and  to  a variational  solution 
for  this  current.  Consider  placing  an  arbitrary  but  known  "test" 
distribution  of  electric  current  J1  ("b!l  source)  inside  V and  let 
this  source  radiate  free  space  fields  (E',H').  These  fields  of 
the  "b"_source  can  be  reacted  with  the  superposition  of  sources 
J.  and  J.  ("a"  sources)  to  yield 


(II —9)  <a,b>  = J J.  • E'dv  + 

primary 
sources_  _ J 

Similarly,  the  fields  of  Ji ,JS  can  be  reacted  with  the  test 
source  J'_and  because  the  resulting  reaction  integral  is  taken 
over  the  J'  source  located  in  the  null  field  region  V,  this 
reaction  is  identically  zero;  i.e.. 


JJ 


E'ds 


(11-10) 


<b,a>  J‘  • (E.  - E.)dv'  = 0 . 


source 

However,  by  way  of  the  reciprocity  between  mutual  reactions  (Eq. 

I 1-8) , Eq.  (II —9 ) is  also  identically  zero  and  can  be  rearranged  to 
give 


(ii-n)  -{ 


Js  . E'  ds  = 


- if  J, 

primary 


• • E'  dv 


primary 

source 


and  by  applying  Carson's  reciprocity  theorem  to  the  right  hand  side 
of  Eq,  (11-11),  the  final  form  for  the  integral  equation  becomes 


(11-12) 


J . E'  ds  = 

S s tfeSt 


J 1 . E.  dv'. 


source 


This  is  now  in  a convenient  form  where_E-j  is  well  defined  (Eq. 
1 1 -2)  and  J'jcan  be  specified  so  that  E'  car.  be  calculated. 


That  leaves  Js  as  the  only  unknown  quantity  in  this  expression. 


Integral  equation  Eq.  (11-12)  is  a special  case  of  a more 
general  Reaction  Integral  Equation  (RIE)  formulation  discussed 
by  Richmond  [26].  Furthermore  the  "zero  reaction"  test  was 
applied  with  an  electric  test  source  J'  only  and  the  result 
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was  the  electric  field,  integral  of  Eq.(II-l);  however,  if  a 
magnetic  test  source  M'  had  been  used,  the  result  would  have  been 
a magnetic  field  integral  form.  This  use  of  a zero  reaction  test 
appears  to  have  first  been  used  by  Kouyoumjian  [27]  and  later 
developed  by  Rumsey  and  Richmond. 

C.  Numerical  Solutions 

Solutions  of  the  electromagnetic  integral  equation,  Eq.  (II- 
12),  have  in  the  past  been  obtained  via  a number  of  classic 
procedures,  e.g.,  modal  (eigenfunction)  expansions,  low  fre- 
quency expansions  (powers  of  k0),  high  frequency  expansions 
(powers  of  l/k0),  variational  methods,  physical  and  geometrical 
optics,  etc.  However,  with  the  advent  of  the  numerical  computer, 
the  most  common  method  of  solution,  especially  for  complicated 
resonant  sized  obstacles,  has  become  the  method  of  moments  [22], 
This  is  the  technique  alluded  to  earlier  by  which  the  integral 
equation  is  converted  to  a system  of  simultaneous,  algebraic 
equations;  the  computer  being  admirably  suited  to  compute  the 
"inversion"  type  solution  to  this  system  of  equations. 

Consider  a generalized  set  of  vector  functions  $n,  n=l  ,2 , • • • 
defined  on  S to  be  suitable  for  expanding  the  induced  surface 
currents  on  S;  i .e. , 


(11-13)  Jc  = l J 7 , 
s ^ n n’ 

where  Jn  are  unknown  (complex)  coefficients  to  be  determined. 

Also  assume_the  nth  expansion  "mode"  $n  of  this  set  radiates 
fields  (En,Hn)  in  free  space. 

* Consider  another  set  of  normalized  vector  modes,  ? , m=l,2,* 

i,  as  a set  of  arbitrary  test  sources  J';  i.e., 


(11-14)  J'  = em,  m=l  ,2,.  • • . 

Let  mode  m of  this  set,  em,  radiate  (Fm,Tim)  in  free  space. 
Equation  (11-12),  rewritten  In  terms  of  these  expansions, 
becomes  the  doubly  infinite  set  of  algebraic  equations  given  by 


where  the  orders  of  integration  and  summation  has  been  inter- 
changed and  the  regions  of  integration  are  over  the  respective 
domains  for  each  mode  function.  The  practical  choice  of  mode 
functions  which  will  be  used  here  leads  to  more  manageable  finite 
systems  of  equations  than  implied  by  Eq.  (11—15) . 

Recall,  the  reaction  test  sources  J'  have  not  yet  been 
specified.  Consider  now  the  particular  choice  for  the  O' 
distributions  em  = <tm,  which  is  known  as  Galerkin's  method_and 
let  this  mode  set  consist  of  a finite  number  of  functions  $n* 
n=l,2,...,N  where  each  function  is  nonzero  only  over  a specific 
interval  in  space  (e.g.,  volume  region,  surface  area,  or  section 
of  a contour);  the  $n's  in  this  case  constitute  an  incomplete  sub- 
sectional basis  set.  Figure  I I -4  illustrates  one  method  of 
subse'ctionalizing  the  surface  domain  of  Jc  where  J'  is 
defined  to  flow  on  surface  S'.  Surface  S’,  in  the  case  of  a 
general  scatterer,  recall,  must  be  located  "inside"  S as  shown 
in  the  figure.  However,  for  the  perfectly  conducting  obstacles,  S 
may  coincide  with  S and  the  zero  reaction  test  will  remain  a valid 
test.  The  system  of  algebraic  equations  defined  in  terms  of  this 
finite  subsectional  mode  expansion  now  takes  the  form 

N ff_  _ ff 

(11-16)  - l J $ , E ds  = * • E.ds' , m=l,2,...,N, 

n=l  n rtJ  n m rV  m 1 

where  Em  denotes  the  electric  field  of  test  source  located  on 
S'.  This  algebraic  system  of  N equations  with  N unknowns  Jn  is 
commonly  represented  in  the  electromagnetics  literature  by  the 
matrix  formulation 

1 

(II-l)  ZI  = V,  J 

where  Z = [Zmn]  represents  the  N x N matrix  of  generalized  mode 

impedances  with  elements  Z given  by 

mn  3 

(H-18)  Zmn  =~  | *t,  ’ 8mds  ; m,n=l  ,2,- • • ,N, 

J n 

I = (Jn)  is  the  N x I vector  of  unknown  mode  currents  and  V = (Vm) 
is  the  N x I vector  of  known  generalized  mode  voltages  given  by 


/ / 
/ / 


NOTE:  n IS  UNIT  OUTWARD 

NORMAL  VECTOR  ON  S 


Figure  1 1-4 - Subsectional ization  of  S and  S'  and  convenient 
surface  coordinate  system  U»t). 


The  expansion  which  defines  Js  is  given  by 
„ N 

(11-20)  J * l J on  S 
s r.=l  n n 

and  the  test  sources  are  given  by 


( 1 1-2)  J'  = 3>m,  m=l  ,2,. • • ,N  on  S'. 


The  indicated  approximation  of  Js  in  Eq.  (11-20),  under  suitable 
conditions,  will  approach  the  true  distribution  when,  in  the  limit, 
the  subsectioning  becomes  infinitely  "fine"  and  N-*».  This  of 
course  defeats  the  purpose  of  numerical  modeling  and  the  assumption 
here  is  that  a reasonable  number  of  samples  (4-10  per  *2)  will  give 
enough  information  to  successfully  interpolate  Js,  The  use  of 
testing  functions  on  S'  instead  of  S when  S and  S'  are  separated, 
also  has  the  particular  advantage  of  avoiding  the  singular  nature 
of  the  self-reaction  of  a source  with  its  own  field.  Normal 
separations  between  S and  S'  should  be  less  than  0.01A  to  give  good 
numerical  results  for  the  types  of  EM  problems  discussed  here. 
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D.  Examples  of  Bases  for  Surface-Patch  and 

Mire-Grid  Modeling 

The  order  N of  the  system  of  equations  represented  in  Eq.  (II- 
16)  is  obviously  dependent  un  the  geometry  and  electrical  size  of 
the  scatterer,  the  choice  of  basis  set  and  the  degree  and  type  of 
subsectioning  required  to  achieve  a desired  numerical  accuracy. 

The  purpose  of  this  section  will  be  to  present  certain  examples 
of  basis  sets  for  the  continuous  conducting  obstacle  and  to 
discuss  some  advantages  and  disadvantages  of  each. 

1.  Surface-Patch  Bases  (Patch  subsectioning) 

Figure  II-5  shows  examples  of  two  basis  functions  suitable 
for  the  surface-patch  model.  Basis  functions  of  this  type  were 
first  considered  by  Wang,  Richmond,  et  al . [28].  A specific 
example  of  the  use  of  the  cosine  modes  on  a flat  plate  scatterer 
is  shown  in  Fig.  1 1-6  where  only  e,  directed  modes  are  considered; 
however,  for  more  accurate  results  and/or  the  case  of  an  arbitrarily 
polarized  incident  wave,  £ directed  modes  would  also  be  included. 

The  approximation  to  Js  is  then  computed  as  a linear  combination 
of  modes  in  the  two  vector  directions  £ and  £. 

2.  Wire-Grid  Subsectional  Modeling  and  the 
Piecewise  Sinusoidal  Basis  Functions 

One  particular  geometry  of  considerable  interest  in  EM  theory 
is  the  thin  cylindrical  antenna  or  scatterer  and  its  applications 
to  the  modeling  of  arbitrarily  shaped  conducting  obstacles.  First 
developments  in  the  use  of  wires  for  numerical  modeling  of 
continuous  conducting  shapes  were  advanced  by  Richmond  [29]  and 
this  approach  was  later  used  extensively  by  Lin  and  Ricnmond  [30] 
and  Thiele  [31],  The  basic  technique  of  wire-grid  modeling  is 
to  define  a suitable  number  of  points  on  the  surface  of  the  obstacle 
and  then  interconnect  these  points  with  straight  wire  segments. 

These  segments  serve  as  approximate  paths  for  the  induced  surface 
currents  and  the  integral  equation  of  Eq.  (11-16)  now  becomes 
one  for  solving  for  the  unknown  surface  currents  on  these  wires. 

One  possible  set  of  basis  modes  which  are  amenable  to  the 
wire-grid  structure  are  the  overlapping  piecewise  sinusoidal 
dipole  modes  introduced  by  Richmond  [32].  Other  types  of  sub- 
sectional bases  often  appear  in  the  literature  [33];  e.g.,  pulse 
bases,  piecewise  linear  bases,  etc.  The  literature  also  refers  to 
trigonometric  whole  bases  [34]  from  time  to  time.  However,  the 
piecewise  sinusoidal  basis  functions  have  been  shown  [35]  to  have 
certain  superior  properties,  making  them  well  suited  to 
numerical  solution  of  wire  structure  problems. 
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Figure  II-5.  Examples  of  subsectional  basis  functions  for  surface  scatterer. 

(a)  Uniform  rectangular  pulse  basis  functions,  one  pulse  per 
subsectional  region;  (b)  Overlapping  cosinusoidal  basis  functions, 
one  cosine  mode  per  two  subsections  in  s,  uniform  in  c. 
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Figure  I 1-6 . Mode  structure  for  computing  backscatter  cross 
section  from  thin  square  flat  plate  (perfect 
conductor)  using  overlapping  cosine  modes 
(sje  Fig.  I 1-5) . 


Figure  1 1-7  shows  two  examples  of  pairs  of  interconnecting 
segments  - separated  pairs  and  overlapping  pairs.  Consider  the 

n + h Hi  nrtlo  mnHa  ni  won  K\/ 


nth  dipole  mode  $ given  by 
/ n 


(11-22)  $n  = 


sin  k0^r2"r^ 
sin  ko^r2"rlJ 

sin  kQ(s2-s) 

sin  k (s0-s, ' 
0 2 l 


r,  r-|  £ r r2 


s , si  <_  s <_  s2  . 


This  mode  flows  as  a tubular  s’irface  current  density  on  the  nth  pair 
uf  intersecting  segments  (v-dipole)  with  arms  in  the  r and  s directions. 
Now  consider  the  test  source  J*  (Eq.  (11-21)  to  be  a filamentary  source 
on  the  axes  of  these  segments.  It  can  be  shown  that  the  reaction  of  this 
axial  test  source  with  any  col  inear  tubular  surface  current  mode 
is  identical  to  the  reaction  between,  this  same  axial  test  source 
and  a filamentary  current  mode  2ira  Fn  located  one  radius  "a" 
away  from  the  segment  axis.  Figure  I I -8  illustrates  the 
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Figure  1 1-7.  Nonoverlapping  dipole  segments  and 
overlapping  dipole  segments. 

equivalent  cases  Numerical  calculations  have  indicated  [36] 
that  for  the  non-colinear  cases  (Fig.  II-7),  the  errors  introduced 
into  the  self  and  mutual  reactions,  by  using  the  axial  test 
sources  and  filamentary  approximations  for  the  surface  modes,  can 
be  neglected  when  segment  lengths  exceed  20  radii  and  spacings 
between  separate  dipoles  exceed  a A or  the  angle  an  between 
two  intersecting  (overlapping)  segments  exceeds  'o300.  Figure  1 1 -9 
illustrates  a section  of  wire-grid  modeling  for  an  arbitarily 
shaped  conducting  obstacle  and  shows  a portion  cf^an  overlapping 
piecewise  sinusoidal  mode  structure.  Only  a few  £ directed  modes 
are  shown;  however,  for  an  arbitarily  directed  surface  current, 
modes  must  be  included  in  the  £ direction  and  enforcement  of 
continuity  of  the  currents  at  each  junction  of  multiple  segments 
assures  that  a junction  having  k intersecting  segments  will  have 
only  k-1  independent  dipole  modes  passing  through  it. 
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1 1 -8.  Equivalence  of  reactions  between  col inear  axial  test 

source  and  tubular  surface  current  and  equivalent  parallel 
filamentary  cases. 
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Figure  1 1 -9,  Sample  mode  structure  on  wire-grid  mode!  of 

conducting  surface,  ^ample^of  £ basis  functions 
shown;  however,  both  £ and  £ function  required 
in  general. 


The  integrals  in  Eq.  (11-16)  become  line  integrals  for  this 
typo  of  modeling  and  successful  application  of  the  piecewise 
sinusoidal  expansion  modes  normally  requires  wire  segment  lengths 
not  to  exceed  0.25X. 

3,  Advantages  and  Disadvantages 

Both  surface  patch  and  wire-grid  modeling  are  generally  con- 
sidered suitable  for  continuous  conducting  obstacles.  However, 
if  the  obstacle  includes  a protruding  section;  e.g.,  antenna 
(monopole),  then  the  wire-grid  type  structure  is  usually  more 
convenient.  The  surface  patch  technique,  on  the  other  hand,  will 
model  the  same  size  surface  with  fewer  modes  but  computations  of 
the  wire-grid  mutual  impedances  are  performed  much  faster  than  for 
the  patches.  If  computing  time  is  critical,  then  the  wire-grid 
model  might  be  considered  to  have  the  advantage,  even  though  it 
may  require  a larger  number  of  modes. 

E,  Chaff  Clouds 

The  discussion  so  far  has  emphasized  the  more  general  cases 
of  arbitrarily  shaped  conducting  scatterers;  however,  it  also  serves 
as  the  basic  background  needed  for  the  problem  at  hand,  namely, 
scattering  by  random  clouds  of  thin  conducting  wires.  Here, 
the  wires  are  assumed  to  be  of  resonant  length  M3.5X  and  the 
piecewise  sinusoidal  modes  are  used  Each  wire  can  then  be 
modeled  as  a p=2  segment  dipole  requiring  only  one  mode  per  wire. 


Possible  exceptions  to  this  will  occur  for  those  cases  where  the 
wire  lengths  are  significantly  greater  than  resonant  length,  a 
situation  briefly  treated  in  this  study. 

Figure  11-10  shows  two  typical  2-segment  wires  and  also 
illustrates  the  approximate  filamentary  models  used;  test 
expansion  mode  m on  the  axis  of  dipole  s and  unknown  expansion 
mode  In  n on  the  surface  of  dipole  t.  The  actual  random  array  will 
consist  of  many  of  these  resonant  wires  with  the  centers  of 
all  wires  chosen  with  uniform  or  nonuniform  probability  in  a 
spherical  volume  of  space  and  each  randomly  oriented  according  to 
a uniform  spherical  probability  density  function.  The  technique  used 
to  generate  the  array  is  discussed  in  detail  in  Appendix  III. 

F.  A Convenient  Change  in  Notation 

A rather  more  convenient,  form  for  the  matrix  equation 
presented  in  Eq  (11-17)  can  be  expressed  using  slightly  different 
matrix  and  vector  notation.  The  following  definitions,  while 
perhaps  unconventional  from  the  standpoint  of  electromagnetic 
theory,  are  in  standard  usage  in  numerical  analysis  and  will 
be  used  throughout  the  remaining  chapters  of  this  study.  The  self 
and  mutual  reactions  or  generalized  model  impedances  previously 
defined  in  Eq.  (11-18)  will  be  denoted  here  by  the  N x N matrix 

A = [a  ] with  the  elements  am„  given  by 

L mn  mn 


> ID 


(H-23)  a 


$ . E_  ds;  m,n  = 1 ,2,.  • • ,N, 

n m 


and  the  generalized  mode  voltages  previously  defined  in  Eq.  (II- 
19)  are  now  denoted  by  the  N x 1 vector  b = (bm)  with  elements 


bm  given  by 


(11-24)  b 


4>  . E.  ds1  , m = 1 ,2,*  • -N. 

m l 


The  unknown  mode  coefficients  Jn,  representing  samples  of  the 
distribution  will  be  denoted  by  the  N x 1 vector  x = (xn) , 
n = 1,2,.--,N.  This  whole  system  of  equations  is  now  expressed 
in  the  new  notation  as 


(11-25)  Ax  = b . 


(b) 


Figure  11-10,  a)  Thin  cylindrical  wires,  b)  Approximate  filementary 
model  using  jriecewise  sinusoidal  expansions  4>n  on 
surface  and  on  axis. 
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The  N x N impedance  matrix  A in  the  case  of  these  random 
arrays  of  thin  wires  will  contain  all  possible  interactions  among 
N wires  and  will  not  be  a "thin"  or  sparse  matrix.  Also,  the 
number  of  wires  considered  will  be  as  large  as  N = 1000  and  hence, 
the  equation  to  be  solved,  Eq.  (11-25),  will  be  a "full"  matrix 
equation  of  up  to  order  1000.  All  elements  of  Eq.  (11-25)  will  be 
complex  numbers  and  the  impedances  given  by  Eq.  (11-23) 
will  be  complex  symmetric,  i.e.,  amr,  = anm  for  all  m and  n.  This 
last  condition  results  from  the  reciprocity  relation  of  Eq.  ( I I -8 ) 
and  the  use  of  Galerkin's  method. 
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APPENDIX  C 
CLOUD  GEOMETRY 

A.  The  Radially  Inhomogeneous  Cloud 


To  create  a chaff  cloud,  N dipoles  are  randomly  positioned  in  space 
and  oriented  according  to  certain  statistical  rules.  Their  orientations 
are  specified  so  that  all  possible  orientations  are  equally  likely,  i.e. , 
a spherical  probability  density  function  for  orientation  is  implied.  Their 
positions  are  specified  by  the  Cartesian  coordinates  (x,y,z)  of  their  centers 
according  to  the  following  rules: 

1.  The  probability  of  finding  the  x-coordinate  of  a dipole  center 
in  a small  increment  ax  about  x is 


(III-l)  g(x)AX  = e 

y 2*? 


1 /* 


2.  The  probability  of  finding  the  y coordinate  of  a dipole  center 
in  a small  increment  AY  about  y is 


( III-2)  g(y)ay 


-I  u 


. M. ...  p"  7 U 


3.  The  probability  of  finding  the  z coordinate  of  a dipole  center  in 
a small  increment  az  about  z is 


( 1 1 1-3)  g(z)az 


_ AZ 


1 (z 
7 6 


4.  The  process  by  which  the  coordinates  (x,y,z)  of  a dipole  center 
are  selected  are  statistically  independent. 

Note  that  the  three  probability  density  functions  are  Gaussian  with 
zero  mean  and  identical  standard  deviation  6,  implying  that  the  cloud 
is  most  dense  in  the  center  and  spherically  symmetric. 

Because  of  the  statistical  independence  property,  the  probability 
of  finding  a dipole  center  in  a small  cube  of  volume  v=AXAyAZ  about 
the  point  (x-j  ,y-|  ,z-| ) is 

fzi+  f-  / 1+  f ,V  r 

UlI-ApPOvyi.ZT'.Av)  = g(x)g(y)g(z)dx  dy  dz 


If  there  are  a total  of  N dipoles  in  the  cloud,  the  number  of  dipoles 
expected  to  lie  in  the  small  cube  v about  the  point  (x, ,y, ,z, ) is  on 
the  average. 


so  the  fraction  of  the  total  number  of  dipoles  lying  in  v about  (x,  ,y,,z, ) 
is  on  the  average, 

aN(x. ,y, ,z,  ;av) 

( 1 1 1-6) fj = g(x]  )g  (y-,  )g(z]  )av 

If  N is  very  large,  or  a large  ensemble  of  clouds  with  the  same  IJ  and 
standard  deviation  6 is  assumed,  and  if  the  sample  volume  av  is  made 
very  small,  we  ran  define  in  the  limit  the  relative  density  of  dipoles 
at  a point  (x1,y1,z1 ) by 


aN  (x,  ,y,  ,z,  *,  av  ) 

n(x1,y1,z1)  --  lim  = g(x]  }g(y1  )g(z] ) 


( 1 1 1 -8 ) ) = 


2 2 21/2 

where  r = (x  +y  +z  ) is  the  radial  distance  from  the  center  of  the  cloud. 
(From  (II 1-8),  we  see  that  the  dipole  density  is  independent  of  (e,<{>) 

(a  spherical  symmetric  cloud)  and  is  proportional  to  a Gaussian  function  in 
the  radial  direction. 

In  our  work,  we  chose  to  characterize  a cloud  by  a constant  which 
we  call  "the  average  spacing  between  dipoles,"  d/\,  defined  as  follows. 

1.  For  a given  spherical  volume  V=( 4/3)uR  over  which  the  average  is 
desired,  calculate  the  expected  number  of  dipoles  in  V;  call  this 
number  kN  where  N is  the  total  number  of  dipoles  in  the  cloud  and 
0<k<l  is  the  fraction  of  the  total  number  of  dipoles  contained  in  V. 


2.  Consider  V to  be  divided  into  kN  equal  cubes,  and  call  the  edge 

dimension  of  each  cube  d.  In  this  manner  we  obtain  the  relationship 


( 1 1 1-9b)  y 


d _ 4ir  V 1 1 R 


X " [T ) ^ ^ 71  X 


In  our  case. 


(III-10) 


which,  evaluated  by  integration  by  parts,  is 

1 fR/*  "lt2  [2  R 'l(ff 

(IIM2)  k 'yfc  U«  e dt-^*e  U 


The  first  term  in  Eq.  (III-12)  is  the  integral  of  the  normalized  Gaussian 
function  and  can  be  evaluated  from  tables.  Values  of  k are  plotted 
vs  R/6  in  Fig.  HI-1. 

If  Eq.  (lll-9b)  is  written  in  the  form. 


1/3 

the  quantity  N d/6  may  be  plotted  vs  R/6,  using  the  values  of  k cor- 
responding to  values  of  RA  according  to  Eq.  (1 11-12).  This  pi  of.  is  also 
shown  in  Fig.  III-l.  In  this  report,  a value  of  R = 2 . 05 S , corresponding 
to  k = 0.76,  has  been  chosen  as  the  radius  of  the  sphere  over  which  an 
average  is  taken  to  obtain  the  relationship  between  d/x  and  6/A.  For 
this  choice  Eg.  (Ill -9b ) is 


(1 11-14) 


d 

A 


_J 

(0.76)1,/3 


fV3 


2. 05  | 


3.62  6 

= i?71  7 


It  was  by  selecting  convenient  values  of  d/x,  such  as  2.0,  1.5,  1.0,  0.5 
in  this  report,  that  corresponding  values  of  6/a  were  obtained  for  use  in 
Eqs.  (III-l),  (II 1-2 ) , (II 1-3) . 

Note  that  the  choice  R/6  = 2.05  is  rather  arbitrary.  If,  for  example 
we  chose  to  average  over  smaller  and  smaller  spheres,  in  the  limit  as 
R/6  -+  0 and  k ■>  0,  we  obtain  the  relationship  between  a new  average 
spacing  d/x  and  6,  A, 

<IU-,5>  r-%t 


2.51 

N773 


Assuming  that  the  5/x  values  calculated  from  Eq.  ( 1 1 1-14 ) are  used  in  (III-15), 
we  see  that  d/x  is  about  0.69d/x,  yielding  the  corresponding  table 


~ same  for  the  two  cases 

A 


Thus,  the  values  of  d/x  presented  in  this  report  are  conservatively  large, 
i.e.,  substantially  smaller  average  spacings  are  encountered  in  the  center 
of  each  cloud. 

The  quantity  (1/d* ) is  equal  to  the  density  of  dipoles  in  the  center 
of  the  cloud  expressed  in  dipoles  per  cubic  wavelength  if  d'  is  in  wavelengths. 
Similarly,  the  quantity  (1/d)3  is  the  density  of  dipoles  averaged  over  the 
sphere  containing  76%  of  the  dipoles.  Some  typical  plots  of  dipole  density 
versus  radius  for  selected  values  of  N and  d/x  are  shown  in  Figs.  111-2,3. 

The  dashed  lines  represent  the  values  of  6/A  as  related  to  d/x  by  Eq.  (111-14). 
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Figure  III-3 


B.  The  Homogeneous  Cloud 

Consider  the  generation  of  N randomly  distributed  points 
representing  center  coordinates  of  N dipoles.  If  these  N points 
are  distributed  according  to  a uniform  probability  density  function 
and  are  confined  to  a spherical  volume  region  V around  the  origin 
with  an  average  volume  density  0,  then  the  radius  of  V is  given 
by 


(II 1-16) 


R 


o{- 


3N 


1/3 


4ttD 


Consider  these  points  to  be  defined  in  terms  of  statistically 
independent  random  variables  r,ft,$  in  the  usual  spherical  coordinate 
systems.  The  probability  of  finding  one  of  these  points  inside  the 
incremental  volume  element  dv  must  be  given  by 


3 
4nR 


^2  ^ 

r sine  dr  ded<|>, 


(III-17)  p(r,e,£)  dr  de  d4>  = 


0 1 r < RQ 


% 

R < r 
o 


to  insure  these  points  will^bj»  uniformly  distributed  throughout  V. 
Since  the  random  variables  r ,fc» ,4>  are  statistically  independent, 
the  independent  probability  density  functions  become 


(III-18) 

P(r) 

(III-19) 

P(e) 

and 

(III -20 ) 

p(?) 

-2 


» 


1 • ^ 
= 2 sin  e 


1_ 

2ir 


The  two  angular  density  functions  above  can  be  computed  in  terms 
of  direction  cosines  cos  a,  cosg  and  cosy  as  follows: 


V ...  ' ■*  ’ ■ 

..  > - - r - - 
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(II 1—21 ) 


cos  e = 2A(1 ) - 1 


(II 1-22 ) sin  6 = (1  - cos20)1/2 
(II 1-23)  J = 2tt  A(z) 

(ITI-24)  cos  a - sin  0 cos  <j> 

( 1 11-25)  cos  3 = sin  0 sin  $ 

(III-26)  cos  Y = cos  0 


where  the  A(i)'s  are  obtained  by  independent  calls  to  IBM-SSP  sub- 
routine RANDU:  A(i),  i =1 ,2 , • • • forms  a sequence  of  uniformly 
distributed  psueclo  random  numbers  in  the  range  0<A(i)<l,  The 
properly  distributed  radial  variable  is  given  by 

(II 1-27)  r = Rq(A(3))1/3 

where  A(3)  corresponds  to  another  call  to  RANDU.  Finally, 
orientations  of  the  N dipoles  are  each  chosen  independently  accordi 
to  the  same  sequence  of  Eqs.  (III-21)  to  (II 1—26) , again  using  in- 
dependent calls  to  RANDU.  Once  the  midpoints  and  orientations  are 
specified,  this  fully  specifies  the  modeled  chaff  cloud  used  here. 


APPENDIX  D 

FULL  MATRIX  COMPUTER  PROGRAM  FOR  MULTIPLE  LENGTHS 


In  Reference  12,  Appendix  II  is  presented  a computer 
program  for  full  matrix  solution  (scrout)  of  chaff  clouds  with 
single  length  elements.  This  appendix  presents  a program  (still 
using  scrout)  extended  in  two  ways:  it  permits  the  analysis  of 

clouds  containing  three  different  element  lengths  in  any  combination 
of  numbers  and  lengths;  and  it  utilizes  improved  algorithms  for 
obtaining  the  elements  zmn  of  the  impedance  matrix. 

The  computer  program  in  this  appendix  is  jsed  to  calculate  the 
random  backscattering  cross  section  of  "ND"  randomly  distributed 
dipoles.  These  dipoles  form  three  groups  and  each  group  has  a dif- 
ferent dipole  length 

Since  the  dipoles  are  randomly  distributed,  one  can  assume  that 
dipole  No.  1 through  No.  N1  are  in  group  1 with  length  DL1 , dipole 
No.  Nl+1  through  N2  are  in  group  2 with  length  DL2,  and  dipole  No. 

N2+1  through  ND  are  in  group  3 with  length  DL3.  Dipoles  within 
each  group  are  further  divided  into  segments  according  to  the  accuracy 
desired.  Segmentation  for  dipoles  in  each  group  are  denoted  by  N0S1 , 
N0S2,  and  N0S3.  Set  N0S1  equal  to  3 means  all  the  dipoles  in  group  1 are 
divided  into  3 segments,  etc.  If  DL1=DL2=DL3  and  N-|=N/3,  N2/3,  the 
cloud  is  made  up  of  N identical  dipoles. 

All  the  input  parameters  for  this  program  are  specified  as  follows: 

1.  N1 : last  dipole  number  in  group  1. 

2.  N2:  last  dipole  number  in  group  2. 

3.  ND:  last  dipole  number  (which  is  identical  to  the 

total  number  of  dipoles)  in  group  3. 

4.  DL1:  dipole  length  (in  wavelengths)  for  group  1. 

5.  DL2:  dipole  length  (in  wavelengths)  for  group  2. 

6.  DL3:  dipole  length  (in  wavelengths)  for  group  3. 

7.  N0S1:  segmentation  used  for  dipoles  in  group  1. 

8.  N0S2:  segmentation  used  for  dipoles  in  group  2. 

9.  N0S3:  segmentation  used  for  dipoles  in  group  3. 

10.  INT:  integration  sampling  constant  (usually  10) 

11.  AL:  wire  radius  for  all  the  dipoles. 

12.  NSETS:  number  of  clouds  to  be  studied. 

13.  Spc:  average  spacing  between  dipoles. 

14.  IZ:  starting  point  of  the  random  generator. 


This  program  is  set  up  to  plot  the  echo  (in  dB)  for  DBPP,  DBTT, 
and  DBTP.  One  can  easily  obtain  the  following  quantities  as  defined 
in  previous  Report  3401-1:  AVTT,  AVPP,  AVTP,  AVI  1 , VARTT,  VARTP , 

VARPP  and  VAR11  usinq  the  outputs  (from  SUBROUTINE  BKCD)  ECTT, 

ECTP  and  FCPP. 


1 


r*r  1 
* v ■< 


■a 


OPTIONS  32K 

complex  usosoj .ettuoo)  ,epp(1oo>  *stioo) 

niMENSIO'M  DBTT»  360)  ♦OBPPCifeO)  ♦08TP(360) 

niMENSION  CA(30)tCB(30)«CG(30)tX(30)*Y(3n)«Z(30) 
ni PENSION  XX(inO) ,YY(100) iZZ(lOO) « CC A ( 100 ) » CCB UOO ) »CCG ( 100 ) 
nl^ENSION  HL123 ( 3 ) , HK ( 10  0 ) 
nATA  PI/3. 141592/ 

PATA  IPM  « MAXNP/100  t 30/ 

IUN=( I0M*IUn-inM)/8+I0M 

TP=2.*PI 

PR=0, 01745329 

AlMQA2=(  < 1.0/, U75)*0. 0254)**?  t 

AlM0A2=1.0 

RE  AO  < 8 ♦ *• ) UL1.DL2«OL3.NOS1,NOS2,NOS3.M.  j2tM0«IM*AL.NSETS 

MuDElaiNHSl-l)*Nl 

mqPE2=(N0S2-1 )*«N2-N1) 

wuOE3=(NOS3-l )*(NP-N2) 

NrtOPE=MODt 1+M0HE2+M0PE3 

INC  = <NPOOE*NMOPE-NMOIjE  )/2+NM0DE 

RtA0<6«->  SPC.T/ 

STOX  = SPC/2.05/(4. *3, 1415 92/(3.*, 76*NQ) )**(l,/3. ) 

r,TOY=STnx 

STDZ=STOX 

no  80  NStTsl.NSETS 
IX”  iz 

call  CI-DbEO<NQ.STOX«STDYiSTDZ»lX»X»Y*ZtCA»CB»CG) 

CALL  CLOMOD ( DLl »UL2 t DL3 ♦ N0S1 « N0S2 « N0S3 , Ml « N2 , ND» I0« 
2.XtY«Z«CA.CB.CG»XX.  YY,ZZ»CCAfCLBfCLG*HK,HL123) 

WRITE (6. 2)  ( (I*XX(I)»YY(I)«ZZ(i) ) •laltNMOOE) 

? P0RMAT(5X,Ib,3fl5,4) 

CALL  ZIJ(NMO0E»XX.YY<!ZZ»CtA»CCB«CCG«HK.HLl2iSAL»lM» 

1 IOM t M0HE1 » MODES «C, ION) 

WRITE(8,3)  ( (I,CU|  )*ISl«INC) 

3 F0«MAT(5X,Ib,2El5.4) 

CALL  SQROTKCiMMOOE.ION) 

ph=o.u 

CpHsl.O 

SPH=0.0 

MpHI=360 

DPHsl.O 

XNTT=-1000.0 

X|mTP=-10U0,U 

XNPP=-10l'0.0 

avtt=o,o 

avpp=o.o 

DO  66  NPM=ltNPHl 

CALL  BKCL(CPHtSPHtO.O»ECTT.ECTP,ECPP» 
2yx«YY.ZZ»CCA»CCB«CCGtHK,NMOOE»lOM,C»ETTtEPP«S«I0N) 

GO  TO  77 

IF ( EC TT.LT, 0.0000000 01)  FCTT=0 , 00000001 
IF (EC  TP. L T. 0,0 0000 0001)  FCTPsO, 00000001 
IF(ECPP.LT.O.OOUOOOOUl)  FCPPsO, 00000001 
PBTT(IMPH)=10.*ALOS10(ECTT*ALM0A2) 
PBTP(NPH)=10.*ALOG10(FCTP*ALMPA2) 

PBPP ( NPH ) =m  ,*ALOG10  ( ECPP*ALMDA2 ) 


56 

57 
56 

59 

60 
61 
62 

63 

64 
6b 
66 
67 
66 

69 

70 

71 

72 

73 

74 
7b 

76 

77 
76 

79 

80 
61 
82 

83 

84 
8b 
86 
87 
86 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 

109 

110 


XNTTbDBTT(NPH> 

XNTPsDBTP(MPH) 

XNPPsDBPP(NPH) 


IF(XNTT,LT,OBTT<NPh) ) 

IFUNTP.LT. OBTP(NPH)  ) 

IFUNPP.lt. DBPP(NPH)  ) 

77  CONTINUE 

AVTlsAVT (+ECTT 
AVPP=AVPP+ECPP 
PHrPH+OPH 

phR=ph*dk 

CpHsCOS  < PhR ) 

SPH=SIN(PHRI 
66  CONTINUE 

AVll=(  AVTT  + A\/pp) /FLOAT  (NPHD/2, 

WRITE<8.-)  SPCtAVll 
SO  TO  2000 
DO  999  NPHsl.NPHl 
DBTT(NPH)=OBTT(NPH)-XNTT 
DBTP(NPH)=DBTP<NPHI-XNTP 
DBPP(NPH)=DBPP<NPH)-XNPP 
999  CONTINUE 

L'  R I T E ( 8 , i 0 0 U ) 

RtAD(6f-)  ICC 

CALL  PLOTl(Nl,M2»NO«OLltDL2»DL3,NOSl ,N0S2,N0S3» 
2lwT»ICC«UBPP.I7.XNPPtSTDX) 

WRl TE ( 8 , 1U00 ) 

READ ( 8 » «• ) ICC 

CALL  PL0T1(N1,n2»N0»UL1iDL2*DL3,M0S1 «N0S2»N0S3* 
2lNT»ICCtOBTT,l7,XNTTtSTDX) 

WRlTE(fltlOOn) 

READ ( 8 ♦ - ) ice 

call  PL0Ti(NltM2,M0*ULl»DL2tDL3tN0Sl.N0S2.N0S3» 

2lNTi ICC»U0TPtIZ«XNTP«STDX) 

F0RMAT(5A, ‘READY  TO  PL0T?*1,3»2* ) 

continue 

IZ=IZ*8709 
IF  < IZ I 76,80.80 
CONTINUE 
IZ=IZ*8388607+1 
80  CONTINUE 
CALL  EXIT 
eno 

SUBROUTINE  CLDMOD  ( OL1 , ULJ> , OL3  * NOS1 » NOS2 , N0S3 » N1 » N2 » ND  » IDM 
2,X«r»Z,CA,CB,CS»XX,YY,ZZ,CCA,CLB,CCG»HK,ML123) 

DIMENSION  X(l),Y(l),Z(l).CAn),CB(l)*C6(l),XX(l)«YT(l),ZZ(l) 
DIMENSION  CC A ( 1 ) » CCB ( 1 ) » CCG ( 1 ) , HK ( 1 ) 

DIMENSION  NM123(3),IL123(2),IU123(3) ,0L123(3),HL125C3» 

TP«2. *3, 141592 
DL123(1)=0L1 
0L123(?)=0L2 
PL123(3)=0L3 
HL123 ( 1 ) sQLl/NOSl 
HLl23(2 ) =QL2/N0S2 
HL123(3)sDL3/NOS3 
NM123(1)=N0S1-1 
NM123J2)=N0S2-1 
NM123(3)=N0S3-1 


1000 

2000 


76 


225 , 


Il123<1)=1 

IL123(2)=1+N1 

IL123(3)=1+i\i2 

IUl23U)=Nl 

IU123(2)=N2 

IU123 ( 3 ) =ND 

KK  = 3 

TF<M0.LT.3)  KKsNO 

00  2 K=1,KK 
IA=IL123(K) 

IB=IU123<K) 

PO  1 1 = 1 A » IB 
nM=NM123(K> 

DO  1 II=1*NM 
LsII+( I-IA)*NM 
IMK.GT.1)  LiL  + IH 

VX<L)=X( 1 )-(OL1?3(K)*0.5-FLOAT( II )*HU123(K) )*TP*CA<I) 

YY  (L)=Y(  1 )-(OLJ.23<K)*0.b-FLOAT(  II  )*HL123(K)  )*TP*CB< I) 
ZZ<L)sZ< I)-<0L123<K)*0.B-FL0aT(H )*HL123(K) )*TP*CG< I) 
rcA(L)=CA(I ) 
rcR(L)=CB( 1 ) 

CoB(L>=CO(I) 

HK(L)=HH23(K)*TP 

continue 

1 R = L 

CONTINUE 
Rt TURN 
Ei'jP 

SUBROUTINE  CLnr,EO(N,STPX  ,STDY  ,STOZ  »I?,X«Y,Z»Ca,CB'CG) 
P 1 ('"ENS I ON  xm,Y(l)tZ(l>,CA()  )»CBU)iCG(l) 

PATA  PI/3. 1*415*2/ 

Tp-2 . *P  I 
IX  = IZ 

STOXK=STOX* l P 
stuyk=siuy*tp 
STDZK=STUZ*1P 
no  3U  I=1«N 

CALL  GAUSSCIX,STOXKtO.C»X(I)) 

CALL  GAUSSUX,3TDYK»0.0«Y(in 
CALL  GAUSSt IX,STDZK«0.0«Z(I) ) 

CALL  RAMUU< 1X,IY«A1) 

I X=I  Y 
PHl=TP*Al 

CALL  R ANOU ( I X , T Y « f i > 

IX  = IY 

C0STH=2,*A2-l.n 
SlNTH=SQKT (1.-COSTh»COSTm) 
caci )=SINTH*C0S<PHI ) 

Cb(  I )=SINTH*SI'"(Hni  > 

CG< I )=COSTH 
CONTINUE 
return 
end 

SUBROUTINE  GAUSSt  IXtSvAPItV) 

A = 0,0 


V 


16b 

167 

166 

169 

170 
? 71 

172 

173 

174 
176 

176 

177 
176 
179 
18U 
161 
182 
163 
184 
18b 
18b 

187 

188 
109 

190 

191 

192 

193 

194 
19b 

196 

197 

198 

199 

200 
201 
202 

203 

204 
20b 
206 

207 

208 

209 

210 
211 
212 

213 

214 
21b 
216 
217 
216 

219 

220 


CO  50  1=1,12 
CALL  RANOUUX,  ir,Y) 

IX  = IY 
50  A=A  + Y 

Vs( A-6.0)*S+AM 
RETURN 

n^o 

SUBROUTINE  RANnU(IX,lY,YFL» 

IY=IX*16645 
If ( IY)5,b,b 

5 IT=IY+836860741 

6 YU  =1  Y 

YFL=YFL*,ll92093E-6 

return 

F NO 

SUBROUTINE  ZIJ<N,XX,YY,ZZ,CCA»LCB,CCG,HK,HL123,AL,INT, 
1 IUM»M00E1,M0DE2»C,IDN) 

COMPLEX  LAA,CBR«LCC 

CuMPlEX  P11,P1?,P21 ,P22»ZMN»CIJ,C(1) 

DIMENSION  xxm  ,YY(1)  ,ZZ(i)  ,CCA(1)  ,CC0C1)  »CCG(1)  ,HK(1) 
DIMENSION  HL123 ( 3 ) 

PaTA  PI/3.141592/ 

Tp=2.*PI 

AK=Al*TP 

CAAaZMN(AL,HLl23(l) ,0,0) 

C8B=ZMN< AL,HL1?3(2) ,0,0) 
rcC=ZMN(AL,HLl?3(3),0,0) 
no  40  1=1, N 

Ii=( 1-1 >*N-< I*T-I)/24I 
IF(I.LE.MODEI)  cell )=CAA 

IF ( I .GT.M0DE1.AN0, I ,LE, (M0DE1+M0DE2) ) C ( IX )scB0 
TF(I.GT.(M00E14M0DE2))  C(II)«CCC 
40  CONTINUE 
N1=N-1 

IF(NI.LT.I)  Nlrl 
no  4b  1=1, N1 
C'S  = HK(I) 

CoSrCOS { US ) 

SUS=SIN(0S) 

Xi=XX(I)-DS*CCA<I) 

Yi=YT(I)-DS*CCP(I) 

7l=ZZ(I)-DS*CCG<I) 

X«*=XX(I ) 

Y2SYYCI) 

72=ZZ(I) 

X3=XX(I)+0S*CCA(I) 

Y3=YY(I)+DS*CCB(I) 

Z3=ZZ(I)+DS*CCG(i) 

IU=(I-l)*N-(I*I-I)/2 

IP=I41 

IF(IP.GT.N)  RETUMN 
no  45  J=IP,N 
DT=HK( J) 

S0T=SIN(UT) 

IJSID+J 
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1 XA=XX< J)-DT*CCA< j) 

2 YA=YT( J)-OT*CCB(J) 

3 ZA=ZZ< J)-DT*CCG(J> 

4 XB=XX(J) 

b YB=YY(J) 

zb=zz( j) 

Xc=XX( J)+OT*CCA< j: 
YC=YY( J)+OT*CCB( J) 
ZC=ZZ( J>+OT*CCG< J) 
riJ=(o. o,o*o) 


Call 

ZGS ( XI , 

Y1 

,Z1 

,X2 

i Y2 , 

Z2,XA 

, Y A , 

i ZA, 

xb,yq, 

• ZB 

iak,ds 

,cus,sus, 

DT, 

SOI 

»IMT 

,P11, 

P12< 

»P2l 

,P22‘ 

CI-IcC 

IU+P22 

call 

ZGS ( XI , 

Y1 

,Z1 

,X2 

» Y2 , 

Z2,XP 

, YB  . 

>ZB, 

XC»YC. 

>ZC 

1AK ,0S 

«cus,sos. 

DT, 

SOI 

» INT 

,P11, 

Pl2. 

»P2l 

,P22) 

Cl  J=c 

I J+P21 

call 

ZGS ( X2 , 

Y2 

,Z2 

, XA 

.Y3, 

Z3,XA 

, Y A . 

.ZA, 

XB,YB, 

.ZB 

1 AK,US 

,cus,sus, 

DT, 

SOI 

i INT 

,P11, 

P12 1 

i P2l 

,P2?) 

CivJ=C 

1 J+P12 

CALL 

ZGS  < X2 , 

YP 

,Z2 

,X3 

i Y3, 

Z3,XP 

,YBi 

. ZB, 

XC,YC. 

>ZC 

1 A K , 0 S 

,cus,sos, 

DT, 

SOI 

» INT 

»PU, 

P12. 

«P21 

,P22) 

C(IJ)=CIJ+P11 

45  CONTINUE 
RETURN 
EImO 

SUBROUTINE  ZFFO ( X , Y « Z , C A , CB , CG . CTH » STH » CPH , SPH « 

2SUK*COK«Hk  «FT,EP) 

COMPLEX  ET,Ep,EJB,ES 
► 9 G=(CA*CpH+CB*SPHI*STH4.C6*CTH 

gk=i.-g»g 

ET=(0.0,0.Ci) 

FP=(0.0,U,0 ) 

IFlGK.LT. 0.001)  GO  TO  200 
R=(X*CPH+Y*SPH)*STH+Z*CTH 
FjB=CMPLX<COS(P) »SIN(B> ) 

FS=( 0.0, 60,0 )*FJB*(CUK-COS(G*HK) J/rK/SDK 
T=(CA*CPh+CB*SPH)*CTH-CG*STH 
p=-ca*sph+cb*cph 
et=t*es 
fp=p*es 
zoo  continue 
return 
fno 

SUBROUTINE  HKCn(CPH,SPH»CTH,FCTT,ECTP,£CPP, 
2X,Y,Z*CA*CB,CG,HK,M,IDM,C»tTT,LPP,$,IDN) 

OlMENSION  X(1).Y(1),2(1),CA(1 ),CB(1) *CG(1) ,HK(1) 

COMPLEX  C(l)  ,ETT(1) ,EPP(1) ,S(1) *ETHtEPH 
PATA  Pl/i. 141502/ 

TP=2.*PI 

STH=SQRTU.-CTM*CTH) 
no  70  I=1,N 
SuK=SlN(hn( I ) ) 
ruK=COS(HK( 1 ) ) 

call  ZFFU ( X ( I ) ,Y( I ) ,2(1 ) ,CA< I ) ,C6< I * *CG( I ) , CTH » STH, CPH, SPH, 
i>RUK,CUK,HK(I)  ,ETT(I),EPP(I)  ) 
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276 

277 
276 
279 
260 
261 
262 
266 
269 
265 
26b 
287 
260 

289 

290 

291 

292 

293 
299 

295 

296 

297 

298 

299 

300 

301 

302 

303 
309 

305 

306 

307 
300 

309 

310 

311 

312 

313 
319 

315 

316 

317 
310 

319 

320 

321 

322 

323 
329 

325 

326 

327 
32B 

329 

330 


S(I)=eTT( I )*<0,0, 1,0) /TP/30.0 
70  CONTINUE 

CALL  SQR0T2(C,S«N,I0M,I0M) 
fjH= ( 0 • 0 * 0 • 0 ) 

EpH=(0. 0,0.0) 

00  80  1=1, N 

E|H=£TH+S(1)*eTT(I> 

EpHsEpH+b (I)*FpP(I) 

80  CONTINUE 

CtTH=CA0b(ETH) 

CEPHsC  ABb ( EPH ) 

ECTT=2.0*TP*CETH*CETH 

ectp=2.o*th*ceph*ceph 

00  90  I =1 , N 

SC  I >=EPPtI>*« 0.0 *1.U) /TP/30.0 
90  CONTINUE 

CALL  SQROT2(C,S«N,10M,ION) 

EPH=(u. 0,0.0) 

00  loo  1 = 1, N 
EPH=£PH+S(I)*EPP(I> 

100  CONTINUE 

CEPH=CA86(EPH) 

ECPP=2.0*TP*CEPH*CEPH 

RETURN 

END 

SUBROUTINE  PL0T1<NA,NB,MC,0L1 «UL2,DL3,N0S1»N0S2»N0S3, 
2lNT,ICASt,F,IX,XN0RM,STDX> 

DIMENSION  LX ( 9 ) 

DIMENSION  IBUF(IOO) ,L1(9) ,L2(5) ,L3(6) «LP(1) , LINT (2) , 
2LN0SC2)  ,LIM(7)  ,LPHI(5)  ,LL(2)  .LLAMDAC3)  (360)  ,X(360) 

DATA  LI » L2 , L3/1 2H  PHI-PHI  RCS*15H  THETA-PHI  RCS, 

210H  THETA-THETA  RCS/ 

RATA  LLAWDA,LINT,LN0S/9H  LAMDA.  , 6H  INT=,6H  NOS=/ 

DATA  LN.LPH1/21H  DIPOLE  RANDOM  CL0U0.*15H  PHI ( DECREES > / 
DATA  LI ,LD/£H  0BSW.3H  L=/ 

DATA  LX/25H  NORM  FACTOR®  OB/ 

CALL  PLOTSUBUF,  lUO,  3) 

CALL  PLOT (0.0, 0,0, -3) 

CALL  Axlb(0.0, 1,5, LPH I, -lb, 1*'.U,0.U, 0,0, 29,0,1.25,-1) 

CALL  AX  IS ( 0. 0, 1. 5,  LL« +6, 6. 25, 90.0 ,-90,0,8.0,1.25,-1) 

CALL  PLOT (0*0, 7*75, 3) 

CALL  PLOT (11,0,7,75,2) 

CALL  PLOT (15,0, 1,5*2) 

YH=8.25 

0=0.2 

CALL  NUMBER (0.1, 7. 50, 0.15, FLOAT (IX 7 »0.0,-i) 

CALL  SYMBOL ( 9. 75 » 7.0,. 15, LX *0.0,25) 

CALL  NUMBER (7.00«7.U» .15.XN0PM 1 0 ,0 *+2 ) 

SpC=STDX*2.05*(9. *3,191592/ (3, *.76* NC) >**(l,/3. > 

CALL  NUMBER ( 13. 6 ♦ 7, 50,0, 15, STDX, 0,0. +9) 

CALL  NUMBER ( 13. 6, 7. 20, 0. 15* SPC» 0.0* ♦4 1 
CALL  NUMBER (O.P *8. 55*.15, FLOAT (NA)«0.0«-1) 

CALL  NUMBER  (O.fi  *8. 25  *,15,  FLO  AT  (NR)  *0.0  «-D 
CALL  NUMBER ( 0, R * 7, 93 », 15, FLOAT (NC) *0.0. -i) 

CALL  SYMBOL(1.MO,YH,W,LN,0.0,21) 
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CALL  SYMbOL<5.75i YHiW.LOiO.Oi3) 

CALL  NUMBER(6.35i8.55,.15,0L1i0.0i43> 
call  NUMb£R<6.35tB.2;>,.15*OLPiO.O»  + 3) 

CALL  NUMb£R<6.35»7.95,.15,DL3i0.0t+3) 

CALL  SYMBOL <7.20, Y H , W , LLAMUA , 0 . o , 9 ) 

CALL  SYMbOL(8.5iYH,W»LlNTiO,n,6) 

CALL  NUMBER < 9, 78 i YH, W, FLOAT (TNT) ,O.Pt-l) 

CALL  SYMBOL  <10.4, YH,W,LNOS» 0.0, 6) 

CALL  NUMBER ( 11, 6 i 8. 5& i.15 i FLOAT (N0S1) i0.o»-l) 

CALL  NUMbER(11.6iP.25i.l5iFLOAT(N0S2) ♦O.Ot-l) 

CALL  NUMBER <11.6i7,95,»15»FL0AT( NOS 3 ) i 0 , 0 ♦ *1 ) 

IF  < ICASE.EQ.l)  CALL  SYMBOL ( 11 . 8. YHi W i LI . 0 . 0 ♦ 12 ) 

TF( ICASE.EQ.2)  CALL  SYMBOL* 11 . 8 , YHi W t 12 ♦ 0 . 0 ♦ 15 ) 

IF (ICASE.EG.3)  CALL  SYMBOL ( 11 . 8 , YH, W i L3 , 0 . Q t 18 > 

CALL  PLOT (0.0iJ,bi»3) 

HO  C 0 1=1,360 

IF (F ( 1 ) ,LT .-40. ) F(I)=-40, 

?0  X ( I ) =1 

CALL  LINL(Xi0.0iii4.0,Fi-40.  - 8. U, 360,0 , 52) 

CALL  PLOT ( 17, 0 « *1 , 5 1 999) 
return 

END 

SUBROUTINE  SOROTl(CiN,ION) 

*»  ***********  ********  *********  ***  ********  *******  ft******************** 

PURPOSE 

TO  TRANSFORM  A SYMMETRIC  MATRIX  INTO  AN  AUXILIARY 
MATRIX  (IMPLICIT  INVERSE) 

USAGE 

CALL  SOROT1(C,N,ION) 

DESCRIPTION  OF  PARAMETERS 

C - THE  ARRAY  CONTAINING  ThE  MATRIX  IN  COMPRESSED 

FORM  ON  ENTRY  ANO  ITS  AUXILIARY  IN  COMPRESSED 
FORM  ON  EXIT 

N - THE  NUMBER  OF  ROWS  UR  COLUMNS  IN  THE  MATRIX 

ION  - THE  DIMENSION  OF  THE  ARRAY  C 

REMARKS 

THE  UPPER  TRIANGLE  OF  THE  MATPIX  IS  STORED  BY  ROWS  IN  THE 
ARRAY  C.  ONE  DIMENSIONAL  SUBSCRIPTS  ARE  RELATED  TO 
CORRESPONDING  TWO  DIMENSIONAL  SUBSCRIPTS  BY 
IJ=(I-1 )*N-( I* I -I )/2+J 

WHERE  IU  IS  THE  ONE  DIMENSIONAL  SUBSCRIPT  AND  I aND  J 
ARE  THE  TWO  DIMENSIONAL  SUBSCRIPTS 

MGTHOU 

"SQUARE  ROOT"  METHOD  FOR  SOLUTION  OF  A SYMMETRIC  MATRIX 
EQUATION.  THE  ORIGINAL  SYMMETRIC  MATRIX  M AND  THE  UPPER 
TRIANGULAR  AUXILIARY  MATRIX  A ARE  RELATED  BY 
M=TRANSPOSE(A)*A 

references 

FAUOEEV,  0.  K.  AND  FADPEEVA , V.  N,,  COMPUTATIONAL 
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414 

415 

416 

417 
41» 

419 

420 

421 

422 

423 

424 

425 

426 

427 

428 

429 

430 

431 

432 

433 

434 

435 

436 

437 

438 

439 

440 


C* 

r* 

c* 

c***» 


methods  of 
Francisco* 


linear  algebra*  w. 
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C*  + *± 

c* 

c* 

c* 

c* 

r* 

r* 

r* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 

c* 


m 

* 

** **************** ************ *************************** *****»*•#• 

COMPLEX  t(IDN) 

C(l)=CSOKT(C(l) ) 

00  1 K = 2»N 
C(K)=C<K)/C(1> 

1 'O  2 1=2,  N 

Ii, 0=1-1 

IpOsl+1 

IO=(I-l)*N-(I*T-l)/2 
T 1 = I D + 1 
no  3 L=1*IMU 
Ll=(L-l)*N-(L*L-L)/2+I 
C<II)=C(U»-CU.I)*C(LI) 

C(H)=CSURT(C(TI)  ) 

IF(IP0.6T.N)C,0  TO  2 

no  5 J=IK0,M 

TU=ID+J 

no  6 M=1,IM0 

MO=(M-l )*N-(M*M-M)/2 

MI=MD+I 

M J=MD+ J 

C(IJ)=C(lJ)-C<MJ)*C(M> 

C(IJ)=C(1J)/C(TI) 

CONTINUE 

return 

end 

SUBROUTINE.  SQROT2(C«S*N«  I DM  ♦ IDN  * 

*******************  ***************************************  ******** 

purpose 

TO  OBTAIN  a SOLUTION  TO  the  SYMMETRIC  MATRIX  EQUATION 
MX=Y  USING  THE  AUXILIARY  OF  M CALCULATED  BY  SQROT1 


USAGE 

CALL 


SQR0T2(C«S,N*IDM»I0N) 


DESCRIPTION  OF  PARAMETERS 


N 

ion 

IDN 


AN  ARRAY  CONTAINING  THE  UPF’ER  TRIANGULAR 
AUXILIARY  M A t R I X IN  COMPRESSED  FORM 
AN  ARRAY  CONTAINING  THE  RIGHT  HAND  SIDE  VECTOR 
OF  THE  EQUATION  ON  ENTRY  AMD  THE  SOLUTION 
VECTOR  ON  FXiT 

THE  NUMBER  OF-  SIMULTANEOUS  EQUATIONS 
THE  DIMENSION  OF  THE  ARRAY  S 
THE  DIMENSION  OF  THE  ARRAY  C 


REMARKS 

THE  UPPER  TRIANGLE  OF  THl  AUXILIARY  MATRIX  IS  STORED  BY 
ROWS  IN  THE  ARRAY  C.  ONE  OIMENSIONaL  SUBSCRIPTS  ARE 
RELATEO  TO  CORRESPONDING  TWO  DIMENSIONAL  SUBSCRIPTS  BY 
I J= ( 1-1 ) *N- ( I * I — I ) /2+ J 

WHtRE  IJ  IS  THE  ONE  DIMENSIONAL  SUBSC RtPT  ANO  I aND  U 
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AKt  The  TWO  DIMENSTONAl  SUFSCR1PTS 

SQWOTX  MIST  »£  CALLED  PEFOPE  THt  FIRST  f N I R Y To  SLPUT2 
ME  THOU 

•'SL'L'AKE  ROOT"  Mt.THOu  FOR  SOLUTION  of  A S YN‘  'f.  T R I C M/lRIx 
EQUATION.  THf  ORIGINAL  SYMMETRIC  'ATRIv  p At  0 THE  UPPER 
TRIANGULAR  AUXILIARY  matrix  a am:  related  by 
MsTRANSF’OSEI  A>*A 

HEFFKLuLLS 

FAUOEEV,  o.  K.  AMU  FA.nrtEtVA,  V.  4,,  Cf  f'  PUT  A T I DUAL 
METHODS  OF  LINEAR  ALGFPRAi  k.  H.  FrEEnAN  Ai.O  CO.,  inH 
FRANCISCO*  1PGA,  P.  144-147 


Complex  si iomj ,ciirno 

«|ll:Sm/Cll) 

• 0 10  I -V.  • Im 
ImOsI-1 

• >U  11  • =1.1IV0 

L is  IL-  l ) *0-  ( L*l.-L  ) / 2*  I 
R(  I )=S( 1 )-C (LT)*S(L ) 

T A = < I - 1 >*(•  -<  I*|-l  >/«-•*! 
MllsS(II/CIIM 
HN=(|N*-iMf.)/2 
S(M)=S<i'JI/C(NNI 

f„l,0=iJ-J 

I'U  R'J  I si  *K  0 

y a N - 1 

KfO=K+1 

y0s(K-l 

r o 2b  LsivPG « N 

kl=KO*L 

)sS(K)-CIKl ) *S l L I 
K|\  = Klj  + K 

MK)=S(R  )/C(KK> 

CuHTINUt 

Ft  TURN 
f,jO 

SUBROUTINE  SICKSI.CI.X) 


!•**»<  ******** 


r * * * * ’ 


>****************** 


PURPOSE 

COMPUTES  THE  SINE  AMU  COSINE  INTEGRALS 
USAGE 

CALL  SICKSI.CI.X) 

DESCRIPTION'  OF  PARAMETERS 

SI  - THE  RESULTANT  VALUE  ska.) 

ci  - the  resultamt  value  cun 

X - THE  ARGUMENT  OF  SI(X)  AND  Cl(X) 

kemahrs 


SlCIOf'O 
S1CI0U1 
SICIUI'2 
S1C10V3 
SICIOi 4 
SlCIOi'S 
SICIU'b 
SlCIOi 7 
S1CI0UC 
SICIUI'9 
SICI01U 
SICKill 
S1CI0J.2 
SlCIUlA 
SICIC14 


[ 


L 

0 


<49b  r*  THE  Af<GUM€NT  VACUF  REPMWS  UNCHANGEO 

49  1 C * 

<49 t C»  Sl'iTROl'Tlf'f.S  AND  FUMCTTUW  SMllPFOGRAT'S  REO'HREO 

<4  99  r*  NONE 

boo  r.  ♦ 


b»ii  r* 

502  r* 

505  r* 
b04  r* 

505  c* 
bO«-  ( * 
bo f r» 
br«  r ♦ 

5?9  C* 
bio  r< 
bi).  r* 
bU  r « 

513  r • 

514  r* 
bib  r> 

b 1 4-  (■«»+.+♦* 


METHOl 

<>(■>  lMJTlOM 

SUX)  = IMTE1.RAI.ISIH(  T)/T) 

CIU»  = lMTrGRAUcOSCT>/T) 
f VALUATION 

PEt  UCUOA  OF  RAi'iOF  US7HG  SYR'MF  T«  Y 

I'  1 H-  E <•  F- N T APPRO XlM AT  1C"‘,9  A!-L  LiStE!  FOR  AhS(X>  GREATER 
THaM  <i  A"0  FOR  APS  <X>  l fob  THAlv  4. 

Kt  FERdMCFS 

If'i'i  S f 1 » ‘ M 1 1 P I C SUOPOUTIf  t.  PACKAGE  P.  57C 
LURt  A<W0  W1“P,  • HOI  YhO'lAL  A.PPRl'X  If‘i/>  Tlf'f  S U I r T i.Gf‘ Al. 
TRANS'-  OHf'S’  . 41ATHE  “ AHTAL  TA6LES  AMJ  nthtn  a I ft*.  TO 
COT  PUT  AT  jOf  » VOL.  15.  1 9o  1 « lSSt-E  7'4.  P.  174-176 


bl A ?=AfclS(X) 

51c  /»■  (2-4,0))  ,)  ,4 


519  ) * = ( 4 - 0-Z  ) » 4 . 0 + 7 1 


S1CI015 

sicioib 

S1C1017 
SICIOIB 
SICI019 
SICItPl) 
SlCH/i 
51CH.2 
SIC  Hr  3 
SlCI0r-4 
SJClOrb 
SlCHr'P 
SlCRr'7 

siciui o 
siciOry 

siciobi! 
S1C1051 
MCIO.p 
l 1CIC33 
SICI034 
SICI033 
SlCIU5fa 
i 1CI0P7 
1 1 CIO  bl. 


520 

521 
o?2 

525 

52*4 

52b 

52b 

527 

520 

529 

550 

551 
5X2 
535 
539 
5X3 
53b 
55  7 

530 

539 

540 

541 

542 

543 

544 
54b 
54b 
54  / 
54  P 

549 

550 


Sl=-i.‘  /.i75/t0  SICIOO? 

IE  (213,2,3  SJCiOHi, 

; Cl  = -l.0E3C.  SJCH-i 

RETURN  i«  S1C1042 

3 <?I  = X*(  ( ( ( (1.75X14lF-9*Y4l#5f,P9tt6f -7)*Y  + 1 , 374160E-S  > *x  + fc  , 9596  39E-4  ) SIC  IOna 

2*Y-»  1.9b4J!f‘2f  -2>*Y  + l,395!>09E-i+;>I/>  ) S1CI044 

01  = ( I 3.77,.  1!  hf-l  + ALOGU  ) . SBC 9BS[.-10 + Y ♦ 1. 5ft49t6E -0  )*Y  SICIU45 

2 + 1.725752F,-bl*Y  + l.JP59‘>'»F-4  r44.S909,0'--5)*Y-4l  t;153nBL-l)  1*2  SlCIOHb 

'■tT0«;'J  S1C104  7 

4 S.i  = SIN<Z)  S1CI046 

Y=C0b(?)  S 1 C 1 0 *4  9 

7=4.0/?  SICI03O 

I‘=u  « t ( (I  (4  .r4«Pb°r  -3*7-2. 2 7°J  43r  -2  )*/♦*•, 51 5fi70f-?>  *2-7. «blb42E-2)  SICI03X 

2*Z+4. 90771 bt -?l*Z-5.33?M9E-3>*Z-2,314bi7E-?>*Z-i  . 13495LE -5 ) +Z  S1CI032 

3 + O.2500UE-,  >*7+2.5039690-10  SIC1033 

VslUllHI  (“b.  1. 066  9 9F. -5  + Z + 2. ri917SE-2)*Z-6. 53726  3F -?)*/  SICI03  + 

P+7.902F  .34E-2)*?-4.  <1 0tj4lbF-2)*Z-7.9455bfcF-3>*Z+2.t^i  1293c  -2)*Z  SICI133 

3-3.7b40nut  -4  >*7-3 . 12241 AP-2  >*Z-fc,F4f.4‘4  jk. 7 ) *2  + 2.500000^  >j  SI  CIO  3h 

C1=Z*  (9I*V-Y*|J)  S1CI057 

Rl=-Z*«S1*L+Y*»A)  SICU?b 

IF ( X > 5 « b 1 6 S1C1059 

f.  4i=-3,iiu553E0-51  FlCIOr>C 

f.  Rt-TUR'Y  S1C1U.1 

r<4‘'  SIC  IUb2 


SUBROUT  ir.£  ZGSfXA,  Y A . Z A . X>; . YP  , ZB « XI . Y1 , 7i , X?  , Y2  « /P  t AH  . 

2C  b.  CObtKUb.i'T,  FL>  I * I A)  I .HI  i .Pl?ir2i,PP2  ) 

complex  l^t .lji .»  j?.lja.e jb.FHi.trta.t >i .etz.hii »hi2.h2t ,H22,bAM 

f\i’’PLtV  SOL'S. SCOT 

FATA  tTA.OAf  .PT/57b,727. 4 .0.1 . > .3.14159/ 

CA=(X2-X1>/1  T 
Cb=(T2-Yl)/L  T 


H 


i 
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(\l  If)  t 


1 Tb=(Z2-Zl  )/t)T 

CAS=(XP-XA)/DS 
fBS=(rB-YA?/DS 
CbS=(ZP-ZA)/DS 
CX=CA*CAS+CB*CpS+CG*CGS 
IFlABS(CC) .CT.O. 997)60  TO  *00 
SZ=(X1-XA  )*r  AS+(  Yl-YA)*CBS+(Zl-ZA)*CGi> 

IM INT.EU.t >GO  TO  300 
CbUSsCUS 

SGOSsCI^PLXt  * 0 « *>0S  ) 

SGOTsC^PLX  ( . 0 « *>01  ) 

T b S = 2 * ( I ‘M  T / ? ) 

IF(INS.LT.2>INS=2 

IP=INS+1 
n t . I - T=OT  /INS 
T = .0 

ObZ=CC*OtLT 
PU  = < .0, .0) 

Pl2=< .0. ,U) 

P2l=( • 0 « • 0 ) 

P*2=(  » 0 . • 0 ) 

aks=ak*ak 
sgn=-i. 

DO  100  IN=1,1P 
7Zl=SZ 
ZZ2=SZ-0i> 

XxZ=Xl+T*CA-XA-SZ*CAS 
YYZsYl+T*CB-YA-SZ*CBS 
ZiZ=Zl+T»CG-ZA-SZ*Cbb 
PS=XXZ**2+YYZ**2+Z7Z**2 
P1  = SQHT(KS-»-ZZ1**2) 

F jA=CMPLX  (COSC  Rl)  .-SIIM  (Rl)  ) 

eui=eja/kj 
R2=S0RT(HS+ZZ2**2) 
r jB=CMPLX( C0S( R2» .-SIN (R2) ) 

E02=EOB/*2 

Ertl=EJA*BGUi>  + ZZl*EJl*CG0WZ?*tj2 
E r2=-£  JB*SGDS+?Z2*E  J2*CG'JS**Z7l*E  J1 
PAC=.0 

IF<RS.GT.AKSJFAC=<CA*XXZ+CE)*YYZ+CG*ZZZ)/RS 
FTl  = CC*(t.J2-EJl  *CbOS)-fFAC*t  Rl 
r |2=CC*(t Jl-EJ2*C&ns)+FAC*tR? 

C = S.  + SG.M 

lFtlN.EQ.1  .OR.  1N.£G,IP)C=1. 
Ci=C*SINtuT~T> 

C2=C*SINtT) 

P11=P11+LT1*C3 
P12=P12+ET1»C2 
P^lsP21+LT2*Cl 
P22=P2*  + t.T2  + C2 
TsT+OELT 
FZ=SZ+MSZ 
1(U.  SbN  = -SGN 

CST=-( .0.1.  )*FTA*OELT/(1?.»PT*SGOS*SGOT ) 
Pll=CST*lJll 


Pl2  = CST*Hli: 

P«;1=CST*H21 

P2?=CST*P22 

PtTUKN 

c^1  = (X1-XA)*CAP^J  Tl-rA>*rt3S<MZl-Z/S)*Ct,S 

Ph1=SUKT  ( (XI  -XA-SZl *C AS ) **2+( Y1-YA-SZ)*CBS )**?+( Z1-Za-SZ1*CGS>**2) 
SZ2=SZ1  +|JT*CC 

Rrt‘2=S0RT(  <X2-XA-SZ2*CAS)**2+<  Y.i-YA-SZ2*CBS)**24-(Z2-ZA-SZ2*CGS)**2) 

0UK  = (KH1+I<H2  )/?. 

IF  ( Dt)K  • L T #AK)nnK=/'K 

tall  ZGMtf  ( . (i,rs»SZl»SZ2«  DO  A «rU3»SDS«S0T  »1.»P11»P1?«  P21 , P22  ) 

Rt  TUH(\i 

ss=SiiRT<i.-cocC) 

E AO=(CGS*Cb-CRS*CG)/SS 
Ctjn=(CAS*CG-CGS*EA)/SS 

roD=(CRS*LA-CAS«,tB)/SS 

r'K  = (Xl-Xtt)*CAO+(Yl  -YA)*CRD+(71-ZA)*CG0 
r K = ARbi(pK) 

IF  (UK. I T./\K  )OK  = AK 
*Z=XA+SZ*CA3 
Y2  = YA  + SZ*(.bb 
?2=ZA+SZ*CGS 
Xpl  = Xl-DK*C  AO 
Ypls Y i-DK*CRD 

ZplsZi-DKUGD  t 

rAP=CUS*tbU-CGS*CRO 
r oP  = CGS*t  Af-CAF*CGL3 
CbP=CAS*tbU-CB<!*tAO 

ni  = CAP*(XPl-XZ}+CflumPl-YZ)+CbP*UPW7) 

T1=P1/SS 

?l”Tl*OC"bZ 

CALL  ZOMMiSl  ,Sl+PS,Tl,Tl*DT,PKtCDS»SL)S.SDT.CC.Pll«Pl2.P2l«P22) 

return 

*•"  I'g  0 

RURROUTII'.E  ZGMMSJ  ,S2tTlf  T2 . 0 , CgDS . SGU)  , SGQ? , CPS I f Pll « PI? , P2l , PZ2 ) 
CuMPLtX  L(2»2)»F(2t?) «GAN«Pll »Pl2»P21 »P?2 
roMPLLV  t9,EC.EK«EL»tKL»EGZIfEi>i«E5>2.Eli.,ET2,EXPA«EXPB 
COMPLEX  LGZ(2«2>  tG*(2)  «GP(2) 

COMPLEX  t> A(2) ,EXe(21 

DATA  ETA»GA^»PT/376,727.  ( .0*1 . ) »3.141i>9/ 

nsQ=U*0 


sgps=sgdi 

IF ( S2.LT. bl ) SGDSs-SGPl 
•SbOT=SGD2 

IF ( T2.LT  .Tl>SGnT  = -SGU2 
TF  < ABS(CPSI ) .GT. 0.997) GO 
r Sl=CEXP(&A«*S1 ) 
rs2=CEXP(GA''"*S2) 
ETl=CEXP(GAIvi*T1  ) 
FT2=CEXP(fc,Afv’*T3) 
r=u/saRTn .-cpsi*cpsi > 

P=C*CPSI 

Eb  = CEXP<GAM*C!wlPLX  ( ,0.B)  ) 
EC=CEXP(GAIV'*CI^PLX  ( ,o»c) ) 
nU  1U  K=l,2 


no  10  L = l,2 
F(K,L)=(.0*.0> 

EK  = E0 

no  50  K = l,2 

FK=(-1)**K 

EL=£C 

00  *+0  L*al,2 
FL=(-1)**L 
EKL=£K*EL 
xx=fk*p+fl*c 
S1  = S1 

DU  AO  1=1,2 

«l=SaHT(0SG+Sl*SI+Tl*Tl-2.*ST*Tl*cPSI ) 

P2=SGRT(L)SG+SI  + SI  + Ti?*T2-2,*ST*r2*CPSI > 
call  EXPJiGArtr^PL* (Ri+fk*si+fl*ti,-xx) , 

2 GAM*C«PLX(H2-*.FK*SI  + FL*T2»-XX)  ,eXA(  I ) I 

call  expo(gai**cwlx(ki+fk*si+fl*ti»x*>  • 

2 GA|«*rwpL.X{K2+FK*SH-FL*T2»XX)  »EXB<  1 ) ) 

7MK.E0.2  .OR.  L « £Q • 2 ) GO  TO  ?0 
zc=si*cpsi 
EGZI=CEXP(GAM*7C) 

call  EXPvJ(GAM*(R1  + ZC-T1)  ,GAM*(K2+ZC-T2>  ,expb> 

CALL  EXPJ(GA«I*(R1-ZC+T1)  ,GAM*(R2-ZC+T2)  ,rXPA  ) 

F( 1 ,1)=2.*SG0S*< .0,1. )*EXPA/FGZI 
F(  I,2)=2.*SG0S*(»0,1» )*EXPB*FGZI 
Sl=S2 

F(K,L)=E(K,U  + (£XA(2)-EXAU)  )*£KL+(EXB(?)-EXB(U  >/L*L 

FL=1,/EC 

fk=i./lb 

CbT=-ETA/(16.*pI*SG0S*SGDT) 

Pll=CST* l ( FC1  ,l)*F(2,2)*ES2-6;U»2)/fS2)*ET? 

A ♦(•F(1,2)*»E(2,1)  *LS2+E  (1,1)/ES2)/ET2) 

Pl2=CST*t <-F (1,1 J-E(2,2)*ES2+E(1,2)/ES2)*ET1 
B ♦(  F(1,?)+E(2,1)*ES2-E(1,1)/ES2)/ET1) 

P2l=CSTl<(  (»F  (2,1)*E(2,?)*ES1  + E(1,2)/ES1)*ET2 
C ♦(  F(2 ,2)+E(2,l)*ESl«E(l,l)/ESl)/ET2) 

P22=CST*( ( F(2,1)+E(2,2)*ES1-E(1,2)/ES1)*ET1 
u +(»F(2,2)-E(2,1)*ES1+E(1,1)/ES1)/ET1) 


Rt  T UP.N 

110  IFtCPSI.LT.O. )G0  TO  120 
TA  = T1 
Tb=T2 
GO  TO  130 
120  TA=-T1 
Tb=-T2 
9bOT=-SGUT 
130  Si=Sl 

no  150  1=1,2 
T j=T  A 

no  i«*o  J=i,2 

71 J=TJ-S1 

R=SGRT(OSQ+ZIJ*ZI J> 

U'=R+ZIJ 

IF (21 J.LT.O. )UsDSQ/(R-ZlJ) 
V=R-ZIJ 
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(41 w M« f H«> J(W ,J «i. j M .Jill J ij|4«V4^i.wi!I^ni9l!B9PPQHP!^lli9Rqnmp|PmM 

71b  IF (2IJ.GT,0. )V=OS©/<R+ZIJ) 

717  TF < J.£G.1)V1=V 

716  IF < J.EU.l)4l=W 

719  FbZ(  I«  J>=CLXP<GAM*ZIU) 

7?U  lUo  TJ=TB 

721  CALL  £*PU(bAM*Vl  »GA!3*V»GP(  I ) > 

722  CALL  £XPU(GAM*Wl  »GAI'1*W,GM<  1 ) ) 

7 23  1 Su  Sl  = S2 

724  rsT=E  rA/ta,*PI*Sfa[)S*SGfiT) 

72b  Pll=CST*(bM<2)*EGZ<  2»?H-GP(2)/tG?(2»P> 

726  2-cGL'S*(GlMl)*£GZ<l,2)+GP(l)/FGZ(l  ,2)  ) ) 

727  Pi2=:CST*l-&M?>*E6ZU«l ) -GP < ? > /EGZ ( 2 , 1 ) 

726  <;+CG0S*(G(ui(l)*EG2‘l.ll4GP(l)/FGZ(l»l)  ) > 

729  P2l=CST*(GM(l)*EGZU«2)+Gpm/EGZ(i,2) 

730  ?-CGUS*<GI*'i(2)*FG?(2«2)+GP(2)/FG2(2»2)  ) ) 

731  P22=CST*(-G<v  (l)*LGZ(l»l  )-GP(l  )/EGZ(l.l) 

732  2 + CGDS*(GiM2)*EGZ(2»1)+GP(2)/FG2(?«1))  ) 

733  RlTUHN 

734  Phil? 

73b  SUBROUTINE  tXPj( VI , V2, W12 ) 

736  COMPLEX  EC»E15«S»T,UC,VC,Vl.V2»Wl2«Z 

73 7 OIMEMSI0N  V(21)*W(21)«D(16>«F(16) 

736  llATA  V/  0 • 22?34  667E  00, 

739  2P.11869321E  01,0.29927363E  01,0.57751436c  01 , 0 . 983 74674E  Ul, 

740  20.1598287HE  02 , 0 * 93307812E-01 , 0 .49269174C  00 , 0 , 121&5954E  01, 

741  2p  .226994956.  0 1 , 0 . 36676227E  01 , 0 . 54253366E  01 , 0 . 75659182E  01, 

742  20.10120226E  02 , 0 . 1313o2B2e  02 , 0 . 16654409c  02, 0. *07764 .9E  02, 

743  20.256**894E  02 , 0 . 31407519E  0? . 0 , 3653c683f  02 , 0 , 48026086E  02/ 

744  nflTA  U/  G.4SA96460E  00, 

745  2*1 ,417000631:  00 , 0 . 1 1337338E  00 , 0 . 10399197E-01 , 0 . 261 U1720E-03  , 

74b  20.B985479lt-n6,0.21»23487L  00 , 0 . 34*21 0l7£  00 , 0 . 2630275BE  00, 

747  2H.12642562E  Oil , 0 • 4n206e6cE-01  , U . 6563P770C-02 , 0 . 12124S61E-02 , 

746  2n.lll6744ot-03,0.64599267E-05,0(!?2263169C*06,0,422  74304E-Oe, 


749 

20. 3921897 3L-10,0.14565152E-12»0. 

14830270E-15, 

0.1&005949E-19/ 

750 

P A T A U/  0.22495942E  02, 

7bl 

2 U.74411568F.  0?,-U.41431576F 

03, 

-0.76754339F 

02, 

0.11254744E 

02 

752 

2 U.160P1 761E  03,-0,2A862l95F 

03, 

-0.50U94687F 

03 , « 

0.68487654E 

02 

753 

2 t.l225477ee:  0?,-0,lUl6l976F 

02, 

-0.47219591E 

01, 

0.79729661E 

01 

754 

2-0 • 21 069574E  U^,  U,2204b490E 

01, 

0.S9728244F 

01/ 

75b 

DATA  E/  0.211031U7L  02, 

75b 

2-U. 37959JA7E  03 , -0 , 97489220F 

02, 

0.12900672E 

03, 

0 • 17949226E 

02 

757 

2-0. 1*910, 95lE  03 , -0 , 55705574F 

03, 

C.13524801F 

02, 

0.14696721E 

03 

75b 

c J.17949b28E  0P,-0,32961014F 

00, 

0.31U26936E 

02, 

0.81657657E 

01 

759 

2 U.22236961C  0?,  0,391*4«9*E 

02, 

0.81636799E 

01/ 

760 

z=vi 

761 

no  100  jiw=i,2 

762 

X=REAL(Z) 

763 

YsAIMAGU) 

764 

Fl5=< .0,,0) 

765 

AB=CABS(Z) 

766 

IF < AB.fQ.O. )GO  TO  90 

767 

I F < X • &£ • U » • ANn»  AB.GT.lO.IGO 

TO 

80 

766 

YA=ABS(YJ 

769 

IF ( X.LE.O,  .AMH.  YA.GT.lO.IGC 

TO 

80 

770  TF< YA-X,b£,17.5.0R,YA,GE,6.5.0R.X+rA.GE.5.5.0R,X,GE,3* )GO  TO  20 


771 

772 

773 

774 

775 

776 

777 

778 

779 

780 

781 

782 
763 

784 

785 
70b 

787 

788 

789 

790 

791 

792 

793 

794 

795 
79b 

797 

798 

799 

800 
601 
802 

803 

804 

805 
60b 
807 

806 

809 

810 
611 
812 
813 
81  *+ 
615 
816 

817 

818 

819 

820 
821 
822 
823 
829 
825 


IFU.LE.-9.  >GO  TO 

40 

/ 

IF  t YA-X.GL.2.51G0 

TO 

50 

TF(X+YA.b£.1.5)G0 

TO 

30 

10 

Ms6 . +3 • *Afi 

Fl5=l./(N-x. 1-7/N 

**2 

lb 

N=N-1 

Fl»=l./«<W.)-2*E1  b/M 
IFtN.Gfc.31G0  TO  15 

Cl5=Z*F15-CiviPLyt  •577216  + ALOG(AB)  ♦ATflN2(Y.X)  ) 


GO  TO 

90 

20 

Jl  = l 
J2=6 

r-0  TO 

31 

30 

Jl=7 
J2= 21 

31 

S=(  .0 

t .0 

ys=y*y 

no  32  I=J1«J2 

XI  = V( 1 >+X 

CF=W(I)/(XI*XT+tS) 

32  S=S+CMPLX(XI*CF«-YA*CF» 

GO  TO  59 
9o  T3=X*X-Y*Y 

T4=2.*X*YA 

T5=X*T3-YA*T4 

Tb=X*T4+YA*T3 

l!C=CMPLX(t3(ll)+0(12)*X+0(l3)*T3+T5-fc(12)+YA-F(l3)*T4» 

2 E(11)+£(12)*X+E( 13 ) *T3+T  6+D (12)*YA+0 (131*14) 

VC=CMPLX(O(lu/+0(15)*X+0( 16 ) *T3+T5-E (15)+YA-E(lb)*T4. 

2 E(14)+E(15)*X+£(16)*T3+T  6+D (15>*YA+D(16)*T4) 

GO  TO  52 
50  T3SX*X-Y*Y 
T4=2.*X*YA 
T5=X*T3-YA*T4 
T6=X*T4+YA*T3 
T7=X*T5-YA*T6 
Tb=X*T6+YA*T5 
T9=X*T7-YA*T8 
TlO=X*T8+YA*T7 

UC=C«PLX(0(  1 )+0(2)+X+0(3)*T3+0(4)*T5+0(5i*T7+T9-(E(2)*YA+E:(3)*T4 
2+E(4)*T6+fc(5)*T8) »E(1)+E(2)*X+E(3)*T3+E(4)*T5+£(5)*T7+T10+ 
3(U(2)*YA+D(3)*t4+0(4)*T6+D(51*T8) > 
VC=CMPLX(O(6)+n(7)*X+D(8)*T3+O(9)*T5+O(l0)*T7+T9-(E(7)*YA+E(8)*T4 
2+fc(9)*Tb+E(10)*T8)  ,E(6)+F(7)*X+E(8)*T3+F.(9)*T5+E(10)*T7+T10  + 
3(U(7)*YA  + U(8)*TH  + 0(9)*T6+D(10)*T8n 
52  EC=UC/VC 

SsEC/CMPLX ( X « Y A ) 

54  EX=EXP(-X) 

T=EX*CWPCX(COS( YA) ,-SIN(YA) ) 
fcl5=S*T 

56  IFt Y.LT.O,  )E15=C0NJG(E15) 

GO  TO  90 

60  ei5=.409319/(2+.193044)+,421831/cz+1 . 02666 )♦. 147126/ { Z+2 . 56786 ) ♦ 

2,206335fc-l/( Z + 9. 90 0 35) + .1 0740lE-2/(Z  + 6, 18215 ) + .158b54E-4/CZ+ 
312.7342)+,317031E-7/tZ+19.3957) 


238 


E 

f 

f 


0 


0 

0 

IJ 


i 


! 

I 


fl?b  | l!>rtlb*LLM  (-?) 

b?  l So  U ( Jln.O.l  )wl?  = f It 
02<>  1(!(.  ? — 
o?7  ?=Vd/\i  r 

030  lM=AIA|j?(Al  ''A(;(2>  .hEAL(/)  > - AT  Ai,?  ( A IMG  ( V?  ) ,RrAL<V?>  > 

031  A'.’  ( VI  > tHf.ALCVl)  ) 

bid  Ad=AUS(TM) 

633  IK  AD.LT.l.  UHs.II 

03h  | f-  ( lH.bl.i.  )Tl'  = b.?"31tUi3 

63b  IK*  JH.LT. -1.  )Tw=-b.263lfir3 

V *b  l'iP=,12-Llf  4C>t>LX(  .OiTH) 

0 3/  ivtTUKfj 

o^t  r ijH 

bVl  ru"'PLLX  burCTIOA'  ?'K*I  ( 01- . XL  « SI  ) 

0l*o  Rt^L  L»Lt,LL 

041  P:A, 20310^3 

6«;.J  C = (’L 

043  l =hl 

04“  Ll=ML 

04t)  HC  = SL 

04b  “of  “'3*1. t 

o4  7 >*sAdS(*Tl»l 

64<,  I.l  = LL 

04V  iyl.  = n + LL 

fcbO  MbiL  = H ♦ V , 114  ( i 

or-j  ih'3l=h+ a.  'j*ll 

05*  X\L=H-LL 

ti'ji  yHL  = SlAi(hUt  ) 

054  C(jLsC09  ( t'LL  ) 

OSD  SfiMsSlMH*X> 

0 50  rt;Hr.CuS(0*(> 

057  SiH:"IL  = SI(M(b*HI«i|.  ) 

650  rull7iL  = C0b(P*X«l  ) 

s;/HPi  =sii,'(t'*rPi  ) 

rpHPL=COii|p*HP|  i 
St,jHP?L  = S 1 ti  f *XP«!L  j 
rbHP2L  = Cl'SIf  *HP2L> 
ct:PP3l  -Sll\  ( ' *XP.aL  ) 
r.tlHP3L  = Ct)S('.’*HP3L) 

UvP:i4HI  |l 

l.'l  = t3*T  f wib 

Tfc  MPsbUP  T ( t.  *0  + H1uIL*H4L  I ♦H»t 
I.0  = T1*'TFPH 

Tt_PP  = SOH  I |U*t'  + HHL»HPL)+MPL 
na=3*  I Fw*" 

Va=B*lJ*P/  tf-p 

Tt»-PsS<J»  I Ht*P4uP^L«  HP2L)+MPPl 
67b  (ij;=b*u*t>/TE^P 

07c  V*=0*trA4' 

07  7 T t_nP=6'.jR  I IU»L'*uP  U*HP3L>4MP3l 

070  (!H  = b*'J*f>/Tt  r P 

673  V*=tH  ri  MP 

OflO  r j.LL  SIC1  ( 5 1 lip  « C J UU  « lib  ) 


I 

1 

] 
i 

U It  6 

2MN03U 
2 'INC  31 


24N032 
L MNU  6 
/’ItJLoS 

1 4(10  A 6 

2 471036 
( 4.JC3  7 
/.V'M0  3 6 
/ r:I.U‘  ') 

/ i'IMu'i  (i 

2nr.'0<U 
Z4N04;i 
2711104  5 
2i*.r<04  4 
l ttlilOHb 
247104b 
74N04 7 
24N048 
2l4M04'i 
2MNOOO 
2«7‘  0D1 
74NU52 
i HMD  bi£ 
2PN0t  A 
2MN004 
24N0ho 
2rtN06t> 
/PNOc./ 
24N0ba 
2HN0t*9 
24M0  70 
2MI071 
2I4N0  72 
24IJ0  7 J 
24N074 
2MN100 


I 

i 
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r*LL  STC1  I?1U1  «t  1U1*U1»  2Mi\Uul 

TaLL  STCi  <SIVP«CJ VP«V?)  ZMNaw 

CaLL  S I C 1 (SlV'nCIVH.V4*)  ZrtNUi 

f ALL  SIC*  (blti'*tC1ll5.U.M  2ilNlt'4 

IP  (O.LE.o.O)  RO  TO  t'O  2HN0/3 

fAl.L  SIC1  (SIVM  iCM/ltVl)  2KNIT/6 

r all  sici  <sivn.civo.voj  zmno/v 

tall  sici  <siv*.cjv3.vaj 

call  aid  ( S 111?  . C I UZ  t UP  ) 2MIJU2 

r aLL  SI(1  ( IIJinC  Il"+«L'A  ) 

i;  = l5.u*  (Cl  hf  L*  »C1  » l *CI  VO-C1M1  -CIVU  -SrH'*t  *(-SlU0  + S.IVl  +SIU1-SI  VI  )♦(: 
j;;h»,L*<p.*i  iv3v».*riij£-rn'?-CTv<2-rjui-civi  )+t.»Mpu*(-si  2v;rH'  • f 

*<? lV«!-S I Ui4S I VI  +SIl'.4-SjiV.M  ♦CPioiAL*  <-C U'2-C  I VP4CIU4  + C IV4  J+M  lif  '“>(.*<  SI  ZNOLvA 
41V -SI  V?-ML'U+ST  V4  ) +2  ,*Ci1L*C  °N*  (-C1  Vl-CIijl+r  I V.S  + OU5  )+?«*CBL*StJH*  ( ?MNV:-'J 

e>si  vi-siui-si  v?+siu3)+<>.*cni  *chhp?l*(C1v«+cum-ci  j?-ci  vo  )+ir.*CHL*se  2*ii')oi;n 
tiHP»L*C-SXVd*Mlli+J'  I Uit‘-SI  VP  J > 2 “UJL-3l 

vsl  *>.u*  (Ctc1  l*  ( -s  iuo-sivo*;;i"T  + SIV1 ) -si*u«l*(  -c  i jo+ci  vo+c  U’i-c  i vi ) ♦ 2.virJov2 

^ritl'PL*  .*’'1  V *Sll.?.*S  I II?4L‘  IVl'  + SIt’J  + r I VI  l+SK'HPt  * < - 2.  * LT  V^+P.*C  Z^NOVA 

itu^+CilL'-L  1 V,-r  UK  +CI  VJ  )+(  .-l<nAu*  (S1UP+S  r V2-ri(i4-cT  VM  ) +r,lilKll.»  (CJl^  ZWOv* 
‘I-Cl  V2-rn.‘.  + C 1 VIOV.HH  *Cl  H*  (SlVl+SIUl-StVl-SlUaJ*  2.*CtH  *-l*M*ltIV  Z.KnL'<b 
3l-t:jUl-ClWi*CI»K4)4^.,*CH|  *LHHr>PL*(-SIV.4“SlU34?IUP'4!'l  v,-)  4-i  . -*CLJl  *SbHP  /.hlML’-f 
( -c  I Vo  + f 1 1*2>*C I « IV— C I V 2 > ) iWVi7 

1,0  To  • P /MlJUSt-. 

>r  roMlff'F  2,raisy 

' =1  b.  0*  ( CiH 'v  L*  f C 1 'Ji.'-C  llil. + ALOr,  ( t(  /HfU  ) ) 4 SuM^l  * ( S 1U0-S1  (JJ  J+SbHPL*  IDS 

> l P . » S 1 l.lA  ] V/ •> - S K ' I I + CPHI  'L  * ( ? » *f  IU  J“C  I '<  .‘-C 1 1 + PLPP  ( MP?L/mPL  ) + ZMMAOfc 

a<\LOt(M  /»-PL  ) >+rriHP.4L*(CIV4-CTV2  + AL00(HP?i./Hr  ^U  ) + SrtHP,JL*  ( SI  V4-S1  V2  2MNXU7 
4 ) + 2 • *CBL*LHH*  ( C I U.'-C  Illl  4AL0C  ( h /l.Pl.  >>  ♦ ? . *CP|  *S«M*  ( SI  03-Si  IJ1)  + Z^Nl-Jb 

o fc.*CHL*i:i!hPirl  *(CIU3-CIVP4AL0G(HPi'L/('PL)  ) + 2 . *CBL*SbHP«>L*  ( SI  L3-  2liN*c9 

(,  si  Vi.')!  I MN 1 1 II 

vtl3.U*(Ct<H,'L*(SlL'T-SIl'0»+S(iM!«L*(CIll('-Clijl  + AL06(HVL/H  > J + LflhPl*  Z^NlU 

2 ( SI  V^+SIl'l -2. 4SM.*  )4Sl  HPl»  (^.*C  JU3-CIVP-CII '1+ALPG  I HPL/HP2LI+ 

,4A1.0GCHPL/h  I )+ranP4L»(};iV^-SjVH»+SBHP3L*(CIV4-CIV2*AL0fiKP3L/HPiiL)  /SNUB 
4 >4P.*CBL*Cl;‘,*<SIlU-SIU3)4c.*PPL*SBH*(rili:'5-CUIl  + AL(''{’<HPL/H  > )+2.*Cb  ZMim* 
51.  »-CbUf’''’L*  ( SI  VP-SIU  4 J *2  • *CbL*S*JHP;*L*<  C IU?»C  I VP  + Al-OG  (HPL/hl’zL  ) ) ) ZMMilb 

■l,  ZPi'msCP'PL  *■  ( h t X ) / « S’-'LfSBL  I Z'tblib 

PlTUNU  2MNI17 

Fi.IT 


APPENDIX  E 

SPARSE  MATRIX  COMPUTER  PROGRAM 


The  advantage  of  reducing  the  computer  storage  requirement  can 
be  achieved  in  solving  a sparse  matrix  equation  using  high-speed 
computers  if  only  the  non-zero  terms  are  stored.  Computation 
time  can  also  be  reduced  if  only  those  operations  (associated  with 
solution  techniques)  involving  nonzero  terms  are  performed.  How-  I 

ever,  most  direct  methods  of  solving  systems  of  linear  equations 
(e.g.,  square-root,  Crout,  Gaussian  elimination,  etc.)  operate  on 
the  original  matrix  to  produce  an  auxiliary  matrix  which  in  general 
is  not  sparse  even  though  the  original  matrix  was  sparse. 

I 

Sparse  matrix  techniques  require  that  this  new  auxiliary  matrix 
be  sparse  as  well.  To  accomplish  this  goal,  special  schemes  are 
used  to  renumber  the  original  matrix  in  order  to  ensure  that  the 
number  of  generated  non-zero  elements  is  minimum  and  to  index  the 
stored  elements  which  include  not  only  the  original  but  also  the 
newly-generated  non-zero  elements.  Consequently,  the  advantages 
of  reducing  computer  storage  and  computation  time  mentioned 

previously  are  only  relative,  since  additional  time  must  be  devoted  * 

to  the  renumbering  part  and  more  storage  space  has  to  be  allocated 

for  the  newly-generated  non-zero  elements.  With  these  facts  in  mind,  5 

we  proceed  to  describe,  in  general  terms,  one  sparse-matrix  method  given 

by  Berry  [44]. 

For  efficient  utilization  of  high-speed  memory  and  to  allow  for 
practical  solution  of  a very  large  matrix  equation,  storage  is  allocated 
for  only  the  non-zero  elements  of  the  original  matrix.  These  terms 
are  collapsed  into  two  columnar  arrays.  The  diagonal  elements  are 
stored  by  rows  in  a linear  array  D with  dimensions  N where  N is  the 
number  of  linear  equations.  The  off-diagonal,  non-zero  elements  of 
the  upper  triangular  portion  of  the  matrix  are  stored  by  rows  in  a 
linear  array  U with  dimensions  less  or  equal  to  N(N+l)/2.  An 
efficient  set  of  pointers  for  locating  these  terms  in  the  array  U 
is  an  absolute  necessity.  For  a symmetric  matrix,  only  the 
pointers  associated  with  the  upper  triangular  array  of  the  matrix 
are  retained.  Two  pointer  arrays  II  and  J are  used  to  index  the 
array  l'.  It  has  dimension  equal  to  N.  The  number  stored  in 
position  k of  this  array  represents  the  starting  location  in  the 
pointer  array  J of  terms  associated  with  row  k of  the  original 
matrix.  0 has  dimensions  equal  to  N( N-l )/2 . This  is  a column 

identifier.  The  number  stored  in  position  k of  this  array  , 

represents  the  column  index  of  the  element  U(k).  Using  the 

information  contained  in  II  and  J,  two  additional  pointer  arrays,  j 

IUR  and  IUC,  are  set  up.  They  record  the  same  information  con-  j 

tained  in  II  and  J,  but  this  time  the  full  matrix  is  being  con- 
sidered. Note  that  IUR  has  dimension  N+l  and  IUC  has  dimension 
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less  or  equal  to  N(N-l).  An  example  should  help  clarify  this 

scheme.  For  the  original  Z matrix  given  below,  the  arrays  would  be  as 

follows: 


T - •• 


0 


D 


Z11 

0 

Z13  0 

Z!5 

( i 

0 

Z22 

Z23  Z24 

0 

U 

z = 

Z31 

Z,o 

sJL. 

Z33  Z34 

0 

0 

Z42 

Z43  Z44 

0 

U 

Z51 

0 

0 0 

Z55. 

n 

11(1)  = 1 

0(1)  = 3 

NUM0FF ( 1 ) = 2 

u 

11(2)  = 3 

0(2)  = 5 

NUM0FF(2)  = 2 

n 

u 

11(3)  = 5 

0(3)  = 3 

NUM0FF(3)  = 3 

11(4)  = 6 

0(4)  = 4 

NUM0FF(4)  = 2 

0 

11(5)  = 6 

0(5)  = 4 

NUM0FF(5)  = 1 

Row  Locator 


N=5 


Column  Identifier  Term  Identified 


j 


IUR(1 )=1 

IUC(1 )=3 

IUR(2)=3 

IUC(2)=5 

IUR(3)=5 

IUC(3)=3 

I UR(4) =8 

I UC  ( 4 ) =4 

IUR(5)=10 

IUC(5)=1 

IUR(6)=11 

IUC(6)=2 

IUC ( 7 )=4 

IUC(8)=2 

IUC(9)=3 

IUC(10)=1 

Z 

Z 

z 

z 


13 

15 

23 

24 


Z 

Z 

Z 

Z 

Z 


32 

34 

47 

43 

51 


A specialized  matrix  decomposition  known  as  the  "square-root 
method"  is  used  to  solve  the  system  of  equations.  Before  decomposition, 
the  algorithm  given  by  Berry  is  used  to  renumber  the  unknowrs  such 
that  the  number  of  non-zero  elements  in  the  auxiliary  matrix  pro- 
duced by  the  decomposition  is  minimum. 


0 

[ 

E 

[ 

[ 

R 

( 

L 


y l 


There  are  three  basic  parts  to  the  renumbering  algorithm.  All 
parts  search  the  non-zero  structure  recorded  by  the  pointer  arrays 
IUR  and  IUC.  An  array  NUMOFF  with  dimension  N+l  is  set  up  to  record 
the  total  number  of  non-zero  off-diagonal  terms  associated  with  each 
equation.  NUMOFF(k)  equals  the  total  number  of  these  terms  that 
would  appear  in  the  Z matrix  in  row  k. 

Part  I of  the  algorithm  searches  the  array  NUMOFF  once  to  see 
if  there  are  any  equations  with  only  one  non-zero  off-diagonal  term. 

If  one  is  found,  it  is  number  1 and  the  array  NUMOFF  is  altered.  A 
single  sweep  through  the  array  NUMOFF  will  rapidly  pick  off  every 
equation  that  has  only  one  or  fewer  effective  off-diagonal  terms. 
Decomposition  of  these  single  off-diagonal  term  equations  will  cause 
no  new  non-zero  terms  in  the  matrix. 

°art  II  of  the  algorithm  searches  the  remaining  equations  (those 
not  renumbered  in  Part  I)  for  equations  which  can  be  decomposed  with- 
out increasing  the  number  of  non-zero  terms.  As  each  equation  is 
checked,  an  array  I FILL  with  dimension  N+l  is  set  up  which  records 
the  number  nf  new  positions  that  would  become  non-zero  if  that  par- 
ticular equation  were  renumbered  next.  If  any  equations  were  re- 
numbered in  this  part,  the  algorithm  is  repeated  because  now  the 
effective  number  of  non-zero  off-diagonal  terms  is  different 
from  the  time  Part  II  is  first  entered.  When  a complete  Part  II 
search  is  made  without  finding  any  equations  for  renumbering,  then 
Part  III  is  entered. 

Part  III  finds  the  equation  that  would  cause  the  fewest  new 
non-zero  terms  by  searching  the  array  IFILL,  After  the  choice  is 
made  and  that  equation  renumbered,  the  new  non-zero  topology  caused 
by  decomposition  of  that  equation  is  recorded  in  the  system  of 
pointers.  After  bookkeeping  operations  have  been  completed  for 
renumbering  an  equation  from  Part  III,  Part  II  is  again  entered  at 
the  beginning. 

After  all  of  the  equations  are  renumbered  into  the  order  in 
which  the  linear  equations  finally  will  appear  in  the  matrix,  the 
II  and  J pointer  arrays  are  reorganized.  For  the  reorganization  all 
of  the  ponters  are  changed  to  correspond  to  the  new  system  of 
equation  numbers  and  include  all  non-zero  terms  that  will  ultimately 
be  found  in  the  upper  triangular  matrix  U. 

Finally,  the  solution  of  the  matrix  equation  is  readily  obtained 
via  the  square-root  method.  This  essentially  is  the  very  same  program 
presented  in  Appendix  II  in  Reference  12.  The  format  sheet  presented 
there  is  repeated  here. 


I ' I o 

t 

I 0 


There  are  six  Input  cards  which  are  specified  as  follows: 


Data  card 
1 

2 

3 


Variables 

NSETS 

N 

TL 


Format  Descriptions 

15  Number  of  clouds  requested  to 

be  calculated 

15  Number  of  dipoles  In  a cloud 

F10.5  Length  of  a dipole  In 

wavelengths 


STDX.STDY  »STD2  »CF  4F10.5 


IZ 


L2NPHI.ANGMIN, 

ANGMAX 


Sv  ndard  deviation  of  a 
Gaussian  ranaom  generator  for 
x,y,z  coordinates  respectively. 
CF  Is  a coupling  factor  which 
weights  the  off-diagonal 
z-matrlx  elements.  Usually 
set  to  unity. 


114  Starting  point  of  the  random 

generator 

I5»2F10.6  (2)  Is  the  nunter  of  look  angles 
taken  In  the  angle  range 
(ANGMIN,  ANGMAX) 


The  computer  output  consists  of  two  parts:  first  print  out  of 
the  Input  data  with  proper  headings;  second  the  average  backscatterlng 
radar  cross  section  calculations  as  described  below. 
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u 


0 


<J 


0 

0 

0 

a 

a 


o 


n 


0 

8 

n 


.■u.^i,w 


WfcW.lll' •!«*•!  in 

* ' ' ’ ' ? • " ^ 


Mwwmmwmmm&wm?/ 


lj 


Variables 

AVTT 

VARTT 

AVTP 

VARTP 

AVPP 

VARPP 

AV11 

VAR11 

S11 (20%) 

S"1 1 (50% ) 

S,! (80%) 


Descriptions 
Average  echo  in 
Variance  of  the 
Average  echo  In 
Variance  of  the 
Average  echo  in 
Variance  of  the 
Average  echo  in 
Variance  of  the 
The  level  under 
The  level  under 
The  level  under 


e-e  polarization 
echo  in  e-e  polarization 
e-$  polarization 
echo  in  e-$  polarization 
polarization 

echo  in  ♦-$  polarization 
both  e-e  and  polarizations 
echo  in  both  e-e  and  polarizations 
which  20%  of  the  return  signals  belong 
which  50%  of  the  return  signals  belong 
which  80%  of  the  return  signals  belong 


Finally  the  starting  number  of  the  random  generator  for  the  next  computer 
run  Is  Indicated. 
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< ************ *4  ****** ************ *********************************** 

CHAXS  - MAIN  PROGRAM 
PURPOSE 

CALCULATION  OF  SOME  STATISTICAL  PARAMETERS  OF  THE 
BACkSCATTFK  FROM  A »RAMDuM»'  CHAFF  CLOUD.  THE  AVERAGE 
VALUES  AMO  VARIANCES  OF  THETA-THETA*  THETA-PHI,  AND 
PHI-PHI  POLARIZATIONS  ARE  OBTAINED.  AN  AVERAGE  AND 
VARIANCE  FOR  LINEAR-SAME  SENSE  LINEAR  POLARIZATION 
ARt  ALSO  ESHMATEO.  THREE  POINTS  ON  THE  CUMULATIVE 
PROBABILITY  CURVE  ARE  ALSO  CALCULATED, 

INPUT  DATA 


NSETS 

N 

TL 

STUX«STDY«STqZ 


L2NPHI 


ANGMIN, ANGMAX  - 
OTHER  PARAMETERS 


THE  NUMBER  OF  DATA  SETS  (CLOUDS)  TO  BE 

Run. 

the  NUMBER  OF  DIPOLES  IN  THE  CLOUD 
The  LENGTH  OF  THE  DIPOLES  IN  WAVELENGTHS 
STANDARD  DEVIATIONS  Of  the  oipole 
COORDINATES  along  the  three  PRINCIPAL 
AXES  IN  WAVELENGTHS 
A SCALING  FACTUM  FOR  THE  COUPLING 
BETWEEN  DIPOLES j USUALLY  SE*  EQUAL  TO  1.0 

A starting  number  for  THE  random 

NUMBER  GENERATORS  USED  TO  SET  UP  THE 
CLOUDS.  THIS  ALLOWS  A GIVEN  "RANDOM" 

CLOUD  TO  0E  REGENERATED  AT  ANY  TIME. 

LOG  BASE  2 OF  THE  NUMBER  OF  "LOOK 
ANGLES"  TO  BE  USED. 

RANGE  OVER  WHICH  THESE  LOOK  ANGLES 
WILL  BE  SPACEDI  USUALLY  0.0*360.0 


X.T.Z 

C A » CB » i 

II  *J 

AVTT.A 

AV11 

VAKTT. 

VARPP* 

PAKAME 


VTP* AVPP  - 


vartp 

VAR11 


COMPLEX  ARRAYS  CONTAINING  THE  COUPLING 

MATRIX  IN  SPARSE  MATRIX  FORM 

ARRAYS  CONTAINING  THE  COORDINATES  OF 

THE  CFNTERS  OF  THE  DIPOLES 

ARRAYS  CONTAINING  THE  DIRECTION  COSINES 

OF  THF  DIPOLE  ORIENTATIONS 

POINTER  ARRAYS  FOR  THE  SPARSE  MATRIX 

calculated  average  backscatter  FOR 
THETA-THETA*  theta-phi,  phi-phi,  ano 
LINLAP-SAME  SENSE  LINEAR  POLARIZATIONS 
Ca;CULATED  VARIANCES  ABOUT  the  ABOVE 
AVERAGES 


TERS  IN  /SORT/  ARE  USEO  BY  ThE  REORDERING  ROUTINES 


REMARKS 

OATA  IS  ONLY  CALCULATED  IN  THE  THEtA  EQUALS  90  DEGREES 


f-'U.'fc.  lHt  UPPfcK  TPl/.fr-Lt  fiF  THt.  />  TR  1 X C IS  STOKLli  liY 
MO.-JS  }f|  A T i?  1 X rc\<rt.  i>f  f SU  <M0U1  IUlS  ORDL*» 

rPSi;Tj  x SF,c.!;T;j  HIP  1-ftail?  DM  I h I S Sl'.'KAbf  ^Ol>E, 


(“#**♦<♦***»***»»»  + ♦»**»**■♦*(*  ♦***«+***♦««#♦♦*♦♦»•♦****«** 

INCLUDE  Mr*"tt«Llbj 

ru'H’LL*  l l« r i ) fin  ) 1-31  .ET1  (?01)  »f  PP(?J1  ) *CAA  • • S < Hll  1 > U [ J 

id’  x t ^ o ’ i «r  (<*ui  > «/(lm  i I «ca(2oi  > tr<!(  n i ) ,C(,( <fn i ) , n i ?.0i ) • J(  l 
d‘L^  ) . Fl>t  I.  ( 3 .1  ) ,51  •.  ( W"  ) 
t ■ i .-it -ms i in-  iiiM.rriui 

i c-f  *U""  l r , M’K  , rVK/t-f/  J«l,,x  . Y , 1 1 C A *CM  ,U, , I 1 , J,  F /SOM  /IOI?Ut  K ( 201  I . .<0 
r"L  («J-Jl  » t li  H O’f.l  > i UJC<  It  13  J .M'^UFF  (k0l»*ITA(?Ol) 

/,  ru'{ -i  M ( I1*  ] b ) I 

CaLL  rrp«(l) 

<4  i-  t'RMA  1 ( 7F  11  .M  I 

<- . * 

i*  KtA"  11  i I r>A1A  Am  INlUAUlZf  RAR  i/n  Tt.RS  * 

r ♦ * 

f'K  = U . U ' 7 t if  fl  I 

r*l  — I 

Th“t.X'  61'.  I 

F t.AO  ).S:  IS  I 

I J l A 0 1 a « .A  » i l 

i t ao ( :■> • h i it  i 

-u.  = Tl./3 . u 
Au  = HL/lOf.(. 

m>v  = P1*TL  i 

Ar\  = l|K/J  OU  .0  I 

I t.AfJ  ( r.*  , *♦  I M t > ,<MHY  .al'iZ.rr 
'>kJTF  (G,lli)',Tl  ♦STi)X<STi)Y«oTr,Zt(:F 

1|'  MJRMAUMil)l)=,l'=«t»H  Lf  Ni;THs«FUI,bf  SUM  RO<  I Tin*  S 1 A M3  AP'  U OF  \»  I M I CUiS  = 
>,lF»5f  lf'.t/ln  ,1  AF'CC'UF'l.l'l!;  F Ar10R=,Ll^.6> 

p | nx*.=  I f’*S  I MX 

C J'»TK  = TM»;*1'  r 
S1I'ZK=  I F**M  I'Z 
I- 1 A -M  a * 2 u ) 1 1 
^ri  F’yKMAT  ( I / ) 

l»E  AUI  ‘J«<;^  )Lc')Pf'l  4 A i'IGMIN*  AI'J&KAX 
d?  F uRHAT(I:>,2r  1U.M 

AkGOIF  = AMA  .AX-«Alfa.«IN 
H U 1 = ii * ♦ L iM’hl 
rif  M = Af-jf-ip  1 f / ( F l <">A  1 ("'PHI  I ) 

Kl  Tf  ( *•-  • PHT  ,U  IHHJ  , AC  or' T ^ . AnC-A.AX 
d<-  I o«*Al  C?.5m  r I'MrmK  OF'  LOOK  ArjGLtS=»15»4Hs?**«l2,l5H  ANl-iLt  H Al'j&t , F b 
■ (FP.1//I 
r«Ll  OIYAl (c |TT*CCI 


CtlFXO HUS 


CHAXOUUb 


( HA  » l1  0 0 7 
Cn A XJUUb 
ChA  <0 009 
rHAXOOAO 
CHFXL'O  Id 
CHAXDU15 


CHAX001H 

CMAX0OA5 


CHAXOU**  7 


Nm1*N-1 

DU  45  1=1, NM 

IplsX+1 

HU  43  JC=IH1»N 

TALL  26AUS(X(X).Y(:}«Z(I)«X(jC}«Y(JC)«Z(jC)<CA(l)iCB(Z)tC6(S)«CA(J 
£C  ) « Cb ( JC)  » CG ( JC ) *ZIJ*6,TT»CC) 

IF(CABSUIJ) ,LT.ThRSHD)GO  TO  43 

J{ IC)=JC 

TC=IC+1 

NUMOFF  ( I )=NUMOFF(  I )+l 
MUMOFF  ( JC  ) = r UMOFF  ( JC  > +1 
43  CONTINUE 
45  !I<I+1)=1C 

IF (IC.OT. 1500) WRITE (0,46) IC 

4f  FoRMAT(39H0ARRAY  j OVERRUN  DURING  INI T I AU ZAT ION/lX , 15 , 1 5H  CELLS  R 
it  uiUIRLO ) 

CALL  EXPAND ( 1 1 « J«  N ) 

^ **************  ********  ****** ****** ************************************* 

C*  * 

C*  GENERATE  POINTER  ARRAYS  FOR  THE  REORDERED  SYSTEM  * 


£*********#*****•#**♦********************************************♦**»***• 

CALL  ORDER ( 1 1 , J »N ) 

C **************  ************ ************  ****** * ******************* ******* 

c*  * 

c»  calculate  mutual  impedances  and  store  in  d and  U * 

c*  * 

c ****** ******************** ***************** **************************** 
no  49  1=1, NM1 
JFSTsIIU) 

JLST=II(I+1)-1 
ISU8=I0RUER( I) 

IF  C JFST.GT. JLST)GO  TO  49 
00  47  JC=JFST,JLST 
JjC=J< JC> 

JSUB=IORUER( JJC> 

47  CALL  ZGAUS(X(IRUB),Y(ISUP) ,Z(ISUt) »X( JSUR) ,Y(JSUB)«Z(JSUB) ,CA(ISUB 
2)  ,CB(  I sue  ) ,CG(  TSUB)  ,CA(  JSU8)  ,Cti(  JSUB)  »CP(  JSUP)  , U ( JC  ) , 6 , TT  » CC  ) 

49  CONTINUE 

e **********************  *********  *************************************** 

c* 

C*  GENERATE  "SQUARF  HOOT*'  METHOD  AUXILIARY  MATRIX  OF  C 

C* 

^ ******  ******* *****************************  **************************** 

call  SPSOTl(0fU«II»J*N) 

p *******************************************************  *************** 

c* 

c*  accumulate  sums  fur  aver apes  and  variances 

c* 

C *****************  ******  ******************************** ***********6+00 


m 


201 

2C2 

205 

204 

205 

206 
207 
206 
209 


*10 


211 

212 

215 

214 

215 

216 
217 
216 
219 
22U 
221 
2 22 
225 

224 

225 

226 
227 
226 

229 

230 

231 

232 
235 

234 

235 

236 

237 
23B 

239 

240 

241 

242 


r**** 

r* 

c* 

r* 

c* 

r*«** 


Ph=0.0 
CPH=1  • 0 

SpH=0,0  i 

AvTTsO.O 

AvTPsO.O 

AVPP=0,0 

vartt=o.o 

VARrP=0,U 
VA«PP=0.U 
PO  66  NPH=l«NPHl 

call  FPT(CPH,SPH.0,0«£CTT»LCTP»ECPP«IORDER) 

AVTTsAVTUECTT 

AVTP=AVTP+ECTP 

AVPP=AVPK+£CPP 

\/aRTT=VAHTT  + ECTT*£CTT 

VaBTP=VAKTP+£CTP*ECTP 

VARPP=VAKPP4ECPP*ECPP 

*******  ***********  **************** ********************************* 

* 
* 

c 


CONSTKUC1  HISTOGRAM  OF  THE  dACKSCATTER  FOR  THE  CUMULATIVE 
DISTRIBUTION  calculation 


5o 


6o 

62 


63 


64 

65 


244 

245 

246 

247 
246 

249 

250 


66 

C**** 

c* 

c* 

c* 

r**** 


******************************************************************* 

PU  50  NSlG=l«lfll 
TEMP=SIG<MSIG> 

IF(ECTT-TEMP)60«50»50 

continue 

GO  TO  62 

FREQ ( NSIG )=FREO (NSIG 1+1. 0 
CONTINUE 

no  63  NS1G=1«101 
T£MPsSIG  t NSIG) 

IF(ECPP“lEMP) 64*63*  65 

CONTINUE 

GO  TO  65 

FREQ ( NSIG )=FREQ< NSIG) +1,0 

CONTINUE 

ph=ph+oph 

phr=ph*ok 

CPH=C0S(PHR) 

SpH=SIN(HHR) 

******************************************************************* 


D 


0 


CALCULATE  BACKSCATTER  AVERAGES  AND  VARIANCES 


* 

* 

* 


******************************************************************* 

NPH2=2*NPHI 

avh=avti+avpp 

VaR11=<VARTT+VARPP-AV11»AV11/FLOAT(NPH2) )/FL0AT(NPH2-l) 
AVll=AVll/FLOAT(NPH2) 


250 


Mi 


y.  III.  t ■ • • <t  - 1.PO 


vahtt=<varti-avi  wav  i t/fluat  inhhi  ) /float  mph-i  > 

AtftlsAVI I/FLOAT(NPhI 

VA«TP=<VAPit‘-AVTH*  AV|f>/F|  CAT<NPh)  ) /FLO  A T ( NPl-1  ) 
I'vTP  = AVTF’/E  t OAT  ( Nl'il ) 

Va'<HP=<  VAt  FP-AVPP*/'  VPP/FLtlAT(  NPH)  ) /FLOAT  ( ilPH-l  ) 
A VPP=A VPK/F  l OAT (FPh) 

FKf«J|i)=M  lf  (1  )/FLOAl  (MPH1)/?.J 
t * = F U.O(l ) 


►♦«**«»  »♦,**>.*»♦*♦*,*** 


CALC  UL  A T ( THHF  f Pl'MTS  ON  Thf.  CUMULATIVE  (.  IS  1 P 1 HUT  IOM  CUN'VE 


• «♦**♦****»*»**♦*♦**»**«•*#-♦***********♦♦**•**»**♦*****♦*******»***** 

''U  70  A'Sli'S." , 1 r T 

FkEw(HSIo>=F  «(  OMSIGJ/f  Lf»Al  (►  Phi  |/^,0 
f».=FX*FRLw('.SIG  ) 
lKFX.Lt.r.P)«5Tl.i!0sSir,(.'l<;jt,) 

I (■  ( F y . I.L  . 0 . ) S T Gf  n = s I G ( NS  1 < 1 

IF  (Fa. I f >r,T(;Wu  = Sl  :.(*!,► 

• F k(  l('jSIt>)=FX 

' (lilt.  (A«  ) A V1T.  V aft  I , AVT|'»  V«|»  IP,  AVPP.  V"!U’P.  r.vil . VAKll  ,S1G20  *il  oso 

e , S T l»'B  0 

..  FpMiAAl  (FMi./.vTT=»  Wt,  15. F ,7m  VAp|T=, HO. A, i,H  AvTP= . E 15, 0 , 7H  vA^TPWE 
.fls.O/t'M  AVFt  =,rj*>.c  ,7h  VAht’P=,tl5.6,FM  / vlls,ri6,e»7H  VA*- 1 1 = , f 1 U . P 
4/UH0M1  UK  «Fm.;j,l?H  k(  ~ uF  IMF  SA  'PlES/Ilh  $.11  BELLI  w ,E15.0, 
4MH  50"'  of  1 F«F  SAMPLE  *, /l  111  Ell  t)f  LU*I  ♦ C-P*  OF  Trit.  SaMPLlR 

5//) 

Tfc=l/*'570V 
IF  (lZ)7ft«*0«bn 

, f tslt  + r.it,,:.;  -,7+1 

t continue 

Kin.  M.15HZ 

: FORMAT  1 75MUA  POOF  NUMPF  «?  TO  U$t  FOR  I. II T I AL 1 2 lNli  THE  MNLOM  GL'VtKA 
pt0k  on  T»JE  i FXT  Hum  u;  ,iil 
Call  lxii 

F Nl) 

SljHrtOUTMt  0 IT  aP  ( ,v  , T » C ) f 


PURPOSE 

SFIS.  UP  COEFFICIENT  TARU.S  FUR  /bAllS 
USAGE 

Call  g it  a o ( \’  * I » c I 


DESCRIPTION  OF  F’A.H  A,«ETE.KS 

(,  - thf  ►’U*ipER  OF  POINTS  7GAUS  IS  TO  USE 

TMf  GHAT  IOM 

T - THE  ABSCISSA  VALUES  FOR  ZGAUS 

( ►'us t 1 1 pinensionfd  in  main  program 


302 

303 
in** 
30b 
306 

30? 

3C*> 

30V 

3Hi 

311 

312 

A 1 A 
31** 

313 
3lb 
31  7 
31  6 
31V 
3?0 

; l 
3?/r 
533 
32** 
3?b 
32b 
3?  7 
3?E 
32V 

330 

331 
33<: 

333 

334 

33b 
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CiiH.SL  = COS(H.«HM,  ) 

7'9''!Uv.H 

566 

40HPL  = S l IN  (l.tl.PI,  ) 

4'1I'.U4S 

53  7 

ronPi.=cos ( i »hpi  ) 

2MINU46 

500 

Sl.iHP^L  = Sl|.  (L  *HPrt  ) 

l Hrj o *t  7 

5 46 

rUHP/L  = CU.S  ( I.' * HP  21.  ) 

2“iri040 

59* 

S‘lF*P3L  = Slf  (t  * HP  AL  1 

^,vimUa«j 

591 
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73b 

c* 

UPPER  TKIMSjlAP  hAlblX 

73  7 

c* 

J - ARRAY  CONTA  Imlhb  Tk't  COLUF'f'  INDICES  OF  I HE 

75*3 

r« 

i.'Urj-ZEPO  ti  EnEMS  I w ThE  UPPER  TkU.MGUi.aP 

737 

r * 

*Air<ix 

740 

c + 

M - THE  NUML-ER  OF  EbOATUiHS  If'  THt  STSlf.p  (MIST 

741 

r « 

BE  LESS  THAI"  OR  EQUAL  TO  UE  OUlNSJoN  OF 

74* 

r* 

II  I A*  TkiE  rALLIk'O  PROGRAM) 

743 

r* 

IOKOER  - POT  USED 

744 

t» 

MOut  - f.'OI  USRu 

743 

r* 

I UR  - ARRAY  CONTAINING  THE  START  IMG  LOCATIONS  OF 

74b 

r* 

TERMS  IN  H'C  ASSOCIATED  WITH  IHF  ROWS  CF  THt. 

74  7 

r* 

FULL  MATRIX  'JN  CUTPlT 

74b 

r * 

IUL  - ARRAY  CU'XTAlwiMo  THE  f.OLUf  N INDICES  uF  THE 

747 

r* 

NON-ZEPO  t|  EhLOTS  OF  T,,t:  n:l>L  PA  IRIX  On  OUTPUI 

730 

c* 

NU.'.OFF  - ARRAY  CONTAINING  TPt  h-j.-iBET  OF  r.'UN-/trtC  OFF 
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r* 

c* 
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C* 

C* 

c* 

c* 

c* 

r* 

c* 

c* 

c* 

c* 

r* 


DIAGONAL  TERMS  IN  EACH  ROW  OF  THE  FULL  MATRIX 
MUST  8F  SET  BY  THE  CALLING  PROGRAMI 
ITA  - NOT  USED 

KEFF  RENEES 

HEKHY,  R.  0,  "AN  OPTIMAL  ORDERING  OF  ELECTRONIC  CIRCUIT 
EQUATIONS  FOR  A SPARSE  MATRIX  SOLUTION"  IEEE  TRANSACTIONS 
ON  CIRCUIT  THEORY  VOL  rT-16  NO.  1 JANUARY  1971  p,  40-50 

* *4  *****************  ******  *********************  ******************** 

COMMON  /SOKT/ir»RDER(201  ) .NODE  ( 20l ) , IUK ( ?0l ) « IUC(  1613)  , NUMOFF  ( 201 ) t 
2 I T A ( 20 1 ) 

DIMENSION  llllhJIl) 

JUR(1)=1 
UA(1)=1 
no  Jo  i = i, m 
TplsZ^l 

IyR< IP1)  = IUR ( I ) +NUMCF  F ( I ) 

(i  ITA(  1P1  ) = 10F  ( IP1  ) 

I F <IUH<N+J ) .GT.lbl 5) WRITE (0,12 HURIN+X) 

? FORMAT (2SH0ARRAY  1UC  OVERRUN  IN  EXPAND/ix , 15 , IX , I4HCELLS  REQUIRED) 
Mm1=M-1 
DO  30  1=1,  NM 
JFST=II(1) 

JLST=II(1+1)-1 

IF ( JFST.OT. JLSTJGO  TO  30 

ISUB=ITAll) 

DO  20  JC=JFST,JLCT 
JJC=J(JC) 

I DC ( 1 SUB ) = JOC 
JSUB=ITAI JJC) 

TuC( JSUB)=I 
ISUB=ISUB+1 
V ITA(JJC)  = ITA(  JJCUX 
0 CONTINUE 

return 

E NO 

SUBROUTINE  OROER( II i JJ,M) 

I,*************,,*********************************  *********  ********** 

purpose 

DE1ERMINFS  A REORDERING  OF  THE  UNKNOWNS  IN  A SPARSE 
MAIRIX  EQUATION  SUCH  THAT  THE  NUMBER  Op  NOn-ZERO  TERMS 
CREATtU  P Y AN  L-U  type  DECOMPOSITION  Is  RtOUCEO.  THE 
SPAKSF  MATRIX  MUST  r»A  VF  A SYMMETRIC  STRUClURE,  I,E,  IF 

cd,o)  .me,  o then  c(J,d  ,ne,  o it  is  not  necessary 

THAT  C(I,J)=C(J,I) 

USAGE 

CALL  ORDFR(II,J,N) 


801 

C* 

802 

C* 

description 

OF 

PARAMETERS 

803 

C* 

II 

804 

C* 

II 

m 

ARRAY  CONTAINING  THE  STARTING  INDICES  FOR  THE 

805 

C* 

ROWS  OF  THr  UPPER  TK I f ;gGLF  OF  THE  REORDERED 

80b 

C* 

MATRIX  UN  rXU.  1I(D)=K  IMPLIES  THAT  J(K ) 

607 

r* 

ANO  U ( k ) CON  Iain  THE  COLUNN  INDEX  ANO  VALUE 

808 

r* 

respectively  of  the  first  off  diagonal  term 

809 

r* 

IN  ROW  J OF  ThF  UPPER  TRIANGLE 

810 

c* 

J 

- 

ARRAY  CONTAINING  THE  COLUMN  INDICES  OF  THE 

8U 

c* 

UPPER  TkIAmGlE  OF  THE  REORDERED  MATRIX  ON 

812 

c* 

EXIT 

813 

c* 

f'J 

- 

THE  NUMBER  OF  muWS  (COLUMNS)  IN  THE  MATRIX 

814 

r* 

IOKOER 

- 

ARRAY  CONTAINING  THt  ORIGINAL  INOICES  OF  THE 

815 

c* 

UNKNOWNS  IN  The  REOKDErEO  SEQUENCE,  IORDER(I) 

816 

c* 

MUST  EQUAL  I ON  ENTRY 

817 

c* 

NODE 

m 

ARRAY  COMPLIMENTARY  TO  lOFoERl  IP  IORD£R(J)=K 

818 

c* 

THEN  NODE(K)=J  NODE ( I ) MUST  EQUAL  I ON  ENTRY 

819 

c* 

IUK 

- 

SAME  AS  II  BUT  FOR  THE  FULL  MATRIX,  NOT  JUST 

820 

c* 

THE  UPPER  TRIANGLE  (DESTROYED) 

621 

c* 

IOC 

- 

SAME  AS  J RUT  FOR  THE  FULL  MATRIX  (DESTROYED) 

822 

r* 

NUMOFF 

m 

ARRAY  CONTAINING  THE  NUMBER  OF  OFF  DIAGONAL 

823 

t* 

TERMS  IN  EACH  ROW  OF  ThE  ORIGINAL  FULL  MATRIX 

824 

c* 

ON  ENTRY  (DESTROYED) 

825 

c* 

ita 

m 

WORK  ARRAY  USED  BY  fHf  ROUTINE 

8 ?b 

c* 

827 

c* 

REMARKS 

828 

c* 

ALL  ARRAYS 

IN  COMMON  EXCEPT  ITA  MUST  BE  INITIALIZED 

829 

c* 

BEFORE  FNTRY,  THE  ACTUAL  VALUES  OF  THF  MATRIX  ELEMENTS  ARE 

830 

c* 

NOT  USED 

BY 

THIS  ROUTINE*  THE  DIAGONAL  ELEMENTS  AND  THE 

831 

c* 

OFF  DIAGONAL  ELEMENTS  ARE  STORED  IN  SEPARATE  ARRAYS  WITH 

832 

c* 

THE  OFF 

DIAGONAL  ELEMENTS  INDEXED  by  II  ANO  J.  IUR ( N4 1 ) 

833 

c* 

MUST  RE 

pEFIMEO  BEFORE  ENTRY 

834 

c* 

835 

r* 

SUBROUTINES 

ANO  FUNCTION  SUBPROGRAMS  REQUIRED 

836 

c* 

RENMBR» 

insert 

837 

c* 

638 

c* 

REFERENCES 

839 

c* 

BERRY  ♦ R 

. D 

. "AN  OPTIMAL  ORDERING  OF  ELECTRONIC  CIRCUIT 

640 

c* 

EQUATIONS  FOR  A SPARSE  MATRIX  SOLUTION"  ItEE  TRANSACTIONS 

841 

c* 

ON  CIRCUIT 

theory  vol  ct-ib  no.  1 January  1971  p,  40-50 

842 

c* 

643 

c******* 

**********  ************ ******  ******* ****** *********************** 

844  COMMON  /SOPT/inRUER  (201 ) .NOPE  ( <£ 0 1 ) y IUR ( ?0l ) t I UC ( 1613 ) , NUMOFF  ( 201 ) « 

84b  2ITA*,2Q1) 

84b  DIMENSION  1FILL<201) *11(1) » JJ(i) 

847  ASSIGN  ISO  TO  IRTN 

848  r **************** ************* ****************************************** 

849  r*  * 

850  C*  BEGIN  PART  I * 
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851 

C* 

PICK  UP  ROWS  WITH  ZERO  OK  ONE  OFF  01AG0NAL  term 

• 

852 

C + 

* 

855 

C* **** ******** * ***  ** ****** ******** **  ****** ****** ***** ****** * ****** ****** 

854 

L UAD  = 1 

855 

no  10  Isa, h 

858 

IK=I0Kn£K( I ) 

857 

IF  (NUflOFP  (XK),t.E.l)CALL  RENMRR  ( IR « LOAQ » N , IRTN ) 

858 

1(1 

CONTINUE 

859 

C**»*  **^*C*  ****-1  *******  ************  ************************************* 

860 

c* 

861 

C* 

£NU  OF  FART  I BEGIN  PART  II 

* 

862 

C* 

PICK  uP  HOWS  WHICH  WILL  NOT  JNCREASt  THE  NUMBER  OF 

* 

865 

r* 

OFF  DIAGONAL  TERMS 

* 

864 

r* 

865 

c**************  ********************************************************* 

866 

HmSRTS=0 

867 

li 

loadel)=o 

868 

IRO=LOAD 

869 

12 

lR=IORDER( IK0) 

. 

870 

IF'ILU  IRO)  = 0 

871 

ICS=IUR( 1K+1 )-1 

872 

ICT  = IURUR) 

875 

MUM  = 0 

874 

15 

IC=IUC(ILT) 

875 

lF«NOOE( 1C) ,LT,L0A0)G0  TO  20 

876 

l\IUM=NUM  + l 

877 

ITA(iMUM)  = IC 

878 

20 

ICTsICI+1 

879 

IF(ICT,LL,ICS)RO  TO  15 

880 

1 = 1 

881 

25 

Jsl  + l 

882 

IF ( J.GT , NUM ) GO  TO  65 

885 

30 

TrTsITA ( 1 ) 

884 

IC=ITA( J) 

885 

ICS=IUR(  1RT  + H-1 

886 

ICT=IUR(1RT ) 

887 

4c 

IF(IC.E0.IUC(ICTMG0  TO  50 

888 

ICT=ICT+l 

i 

889 

IFdCT.Lt.ICSIGO  JO  40 

■ 

890 

IF 1LL( 1R0)=IFILL< IROM-1 

891 

IF  ( INSRTS.EW.DCALL  INSERT  (XRT«XCtN) 

892 

50 

IF< J.EQ,NUM)GO  TO  60 

695 

J=J+1 

694 

GO  TO  30 

895 

6o 

1 = 1 + 1 

896 

GO  TO  25 

897 

65 

IFdNSRTS.NE.DGO  TO  70 

898 

call  renmbr ( IR,L0A0»N, IRyn} 

899 

insrts=o 

900 

GO  TO  11 

wm\ 
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902 
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904 
90b 
90b 
907 
90B 

909 

910 

911 

912 
914 
914 
91b 
91b 
917 
916 

919 

920 

921 

922 

926 
924 
92b 
92b 

927 
926 

929 

930 

931 

932 

933 

934 
93b 
93b 
937 
936 

939 

940 

941 

942 
944 
944 
94b 
94b 
947 
946 

949 

950 


7T 


75 
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C* 

r* 

c* 

c* 

c* 

c***« 


IF<IFILL(IRO).NE.O)GO  TO  75 
l.OAOEO=l 

CALL  RENM8R(IP»LOAD»N»IRTN) 

IRO=IKO+1 

IMIRO.Lt.N)GO  TO  12 
IF (LOADtU.fot.O)GO  TO  11 

******************************************************  ************ 


ErgD  PART  II  BEGIN  PART  III 

PICK  UP  ROW  WHICH  WILL  ADP  THE  FEWEST  HOW-ZERO  OFF  DIAGONAL 
TERMS 


flo 

90 


100 


llo 
120 
1 30 


140 


C**** 

C* 

C* 

C* 


****************************************************************** 

JsLOAD 

ITEST=IOHOER( J) 

K=J>1 

IFUFILLCK)  .GE.IMLH  J»  )GO  TO  100 
IK=IOHOEK(K) 

IuROER<K)=ITEST 
IOROER(J)=IH 
NuOE< IR)=J 
HUOL( ITLST )=K 
ITEST=IR 
IR  = IF1LHK) 

IFILL(K)=IF1LL( J» 

IFILL( J)=IR 
KsK  + 1 

IF(K.LE.N)GO  TO  90 

IF(IFILL(L0A0),NE.IFILL(J))G0  to  110 
JsJ+1 

IF<J.LT.N)GO  to  80 
Kl=J~1 

ITEST=I0K0ER(L0A0J 

k=loau-h 

IF(K.LE,KE)G0  TO  130 
INSRTS=1 
GO  TO  11 
Ih=IOKOEK(K) 

IF(NUM0FM1R),LE.NUM0FF(ITEST>  )GO  TO  140 
I ORDER ( K > = ITEST 
I0RDER(L0AD)=IR 
NOOE( IR)SLOAO 
WOOL (I TEST )sK 
ITEST=IR 
K=K  + 1 

GO  TO  12U 

******************************************************************* 


4] 

* 

i] 

0 

0 
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END  PART  III 

REORGANIZE  POINTER  ARRAYS 


951 

C* 

* 

95* 

r**************  ********** *************************  ********************** 

954 

1 tin 

i=i 

954 

TF( 1UK(M  + 1)  ,bT.1615)W«ITF ( 0 « lb* ) IUR { N+l ) 

950 

152 

FORMAT  (J?  JHLARRAY  IUC  OVERRUN  IN  0R0ER/1X,I5,i5H  CELLS 

REQUIRED) 

956 

t 0 17 u LUAl  = 1 » M 

957 

T i <LOAD)=I 

956 

TK=IORDER (LOAD ) 

959 

ilS=iup ( AR+l )»1 

960 

ICT=IUR( 1HJ 

961 

in  ICT.GI  .ICSJgO  TO  170 

96* 

PO  16o  IL  = 1CT  ♦ TCS 

964 

I uC I C= 1 UL ( 1C ) 

964 

IF ( 1C.EO.ICS)GO  TO  ltk 

966 

KP1  = 1C  + 1 

966 

Ho  16U  JLslCpJ'lCS 

967 

IUP JC=IUL ( JC ) 

9b6 

IF(N0DE(1UCIC).LE.N0UE<IUCUC) >U0  TO  160 

969 

IuC ( 1C ) =1UCJC 

970 

TuC( JC)=1UC1C 

971 

ToCIC=IULoC 

97* 

160 

CONTINUE 

974 

162 

IMNODE<  1UCIC)  .LT.LOAOJGO  TO  165 

974 

Jo< I )=NOU£( IUCIC) 

976 

1 = 1+1 

97b 

165 

CONTINUE 

977 

170 

continue 

976 

return 

979 

E NO 

980 

SUBROUTINE  RENMBK ( IR«LOADiN»  T«TN) 

981 

c**************  *****************************  **************************** 

982 

c* 

986 

c* 

PURPOSE 

984 

c* 

TO  RtNUMnf K ONE  UNKNOWN  AND  UPDATE  THE  INDEXING 

arrays 

98b 

r * 

IUR  AND  TUL  ACCORDINGLY.  CALLED  FROM  SUBROUTINE 

ORDER 

966 

c* 

987 

c* 

USAGE 

986 

c* 

caul  HEMNBR( iRtLOADtNt TH fN) 

989 

c* 

99U 

c* 

DESCRIPTION  OF  PARAMETERS 

991 

r* 

IR  - ORIGINAL  INDEX  OF  THE  UNKNOWN 

992 

c* 

LOAD  - THE  NEW  INDEX  TO  0E  ASSIGNED  To  THE 

UNKNOWN 

993 

r * 

N - THE  NUMBER  OF  UNKNOWNS  IN  THE  SYSTfll  OF 

994 

C* 

equations 

995 

r* 

I R 1 N - ALTERNATE  RETURN  ADDRESS 

996 

c* 

99  ? 

c* 

REMARKS 

996 

c* 

ALL  ARRAYS  IN  COMMON  APE  THE  SAME  AS  IN  SUBROUTINE  ORDER 

999 

r* 

1000 

c* 

REFPRt-iMCES 
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/SOF  T/IOROER  (i  oi  ) .fiOPF  (ci'J  ) « JUKI  ->c  1 ) , JI.IC  U f 1$)  . jlU  OFF  { t>01 ) * 
MTM20J  ) 
ii>roii<=o 

*Uf;F  I L = 0 

TF  (MUUF  < Ip  ) ,L  T.l ")b(>  TO  M P 
I l f lk  P=  I Of  I F I'  Jt.riAl' ) 
tnOlniiUi’lTJ") 

1 ^'Jf  a < LOM  I = J0 

f ul'L  ( 1“  )=Ll  '>l! 

1 0(<  JF.  i>  < I hi.  1 »=JTfMP 
l-  u"t(  1 Tt, I'iH  ) - l|.  oT 
l 0 A 0=1. l)Al  + J 

H (t-OA  '.br  . OHM  UK?'  Jr* T': 

1 (.S=K'r  ( 1H  + ] ) -1 
ltT=lUP( AN ) 

Ir  ( lr  r.i-l  . U sjr.o  to  mi 
li,  = IUC  ( IL  I ) 

U ThOUf'dR  J .LT.LOMm-0  TO  50 

•-UMOFP  I IK  ) =:  UhOFF  « INI-1 

Tp  f MN'FK  IF  ) .r-T.J K.U  TO  all 

I'jf’F  ILsMOriF  IL  + 1 

I TATMUhFAU  = lR 

JClslCWl 

lF<lCl.LL.KS>r,0  Tu  i-U 
I yA01NsLUAf.JN-H 
1ML0A01H*G1  .Wl«iFIUhf  TUPo 
I »<—  I T A I LOAL'  IN  ) 

00  TO  10 
f gt) 

SOHFvOOT  I **  * lMSiKIUHUJC.lv) 

*♦* ♦♦*♦ *****  *****  ******  * * * * *******  ****  t * * * ************************ 

PURPOSE 

TO  1MSIHT  TFRilb  IMTO  THE  IMCtXlMt  ARKAYS  lUp  AM)  ICC 
WHlC)  RFTEH  TO  MOM-2LRO  OFF  UIAOOf ftL  TERMS  WHICH  WILL  RE 
CKLATCO  or  QM  L-U  PtC0"PUSlT10M. 

CALI. CO  FROM  SUBROUTINE  TMUCR 

USAOC 

CALL  1MSFHM1H),1C,U) 

DCSCRIP1IOM  OF  PAIAMCTLRS 

IRT  - 1 ML  1‘JPlX  r>F  THE  ROM  1,|T0  WHlCn  iHt  TERMS  ARE 

TO  (if  TmSFRTLO 

TC  - THC  LOl.ohh  IMOFX  WHICu  IS  TO  BE  INSERTEC  • 


10  >1  c* 

1US2  r * 

loss  r* 
los*  r> 
iost>  c* 
10-0  c* 
ior*7  r* 
lest  r* 
iosy  r * 
mu  r* 
iof.1  r* 

1062  CM 

Usa 

ioftR 

Ht 

1066 

100/ 

1 U 6 *.! 

1069 
10  70 
1071 
1U72 
1074 
1 u7“ 

107^ 

10  7o 
1077  . 

1 0 71: 

U 79 
1 Cao 

10bl 
1 O'V 
1064 
loss 
loot) 
lUflf 

1 or./ 
i o-io 
1US9 
1 ovo 
1091 

loo*  r*1 
1094  r* 
1099  r* 
io?t>  r* 

109b  C* 

1 09  7 r» 
lost*  r* 

1099  r* 

1100  c* 


M - THE  MllfVtR  Of-  UNKNOWNS  IN  THE  STSTf K Of 

f Ut AT  IONS 

KtNAKKS 

ftU  ARRAYS  If  C OK  NON  APE  THt  SAME  AS  JN  SUBROUTINE  OR(E« 
KFFFKLHl.ES 

REFRY*  R.  o.  "AW  OF  I INAL  ORt>tPI‘«G  OF  f LF  1 1 F OMC  ClFCl'lT 
E0UM10NS  FOP  A SPARSE  NaTPIX  SOLUTlOf"  IEf.»  IF  A»<SACT  U'fiS 
OM  cl»lUTT  THEORY  VOL  fl-lF  NO.  1 JANUARY  1971  P,  00-hii 

■t t + + i+**%  + **  *1  ******  + ****  + ***•***  **•******'****■*  ***  + ****+*********** 

( /SOF.T/IOHUf  R(2l.l)  .(.fPruol  I • I IK  ( r-nl  1 , H Cl  lhl3)  ,NW  OF  f 1*P1) 

i 

U..OW  i=IlJMU  + l 1-1U9  1 lKT  + 1 ) 

1 =!' 

Id  L-L+l 

t*  sUIRt"+l  )-L 
1U»  <f+l)  = lUt  ( K Y 
IF  (L.Li  .l'ifVMr,o  rn  10 
f t^OFF  UM  >=NU"*OFF  1 lhl  1 + 1 
iur.iK)  = it 
l =1RT 

;■* t*  l=i.+i 

HlKIL  IsRMD+t 
Jf  U.LF.MGO  TO  21 
lU0W')|=IllKlnl41)-UtK(lt*l) 

I -C 

4i:  t.=l*l 

FslUrttn+D-L 
1UCIK91  ) = H>C  (K» 

) R 1 L • L T * J i-U'-.N  ) RO  TO  40 
A U',J,OFF  ( II.  Isl'  UKOFF  1 1CI  + 1 v 

TuCO\)  = IM 
LrlC 

U(|  L=(-  + l 

TUKILlsIUfm  ) + l 
IFIU.UF  .l*  )90  TO  40 
OtlURN 
EwO 

SUMHOUT  l ,nr.  SFSQT1  i I * U . 1 1 , J . N 1 


PURPOSE 

TO  II  ANSFOK«  A SYWlTRTC  SPARSE  MATRIX  INTO  A SPARSE 
AUXILIARY  MATRIX  U.FlICil  INVERSE) 

USAOE 

CALL  SPS0T1  ((•iU.II.JtMl 


1101 
1102 
13  03 
110*4 
110ft 
110b 

1107 
110ft 
lin* 
1110 
mi 
1112 
1113 
1.11*4 
1113 
1110 
1117 
111b 
1110 
11211 
1121 
3 1?2 
n?3 
112** 
112ft 
112b 
1127 
112ft 
112* 
1130 

nn 

1132 

1133 
113*4 

113ft 
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c* 

r* 
r* 
r* 
r* 
r:* 
r* 
c* 
r* 
r* 
r» 

r* 
r* 
r* 
r* 
r* 
r * 
r* 
r * 
r » 
r * 
r » 
r* 
r • 
r* 
r* 
c* 
r* 
r* 

r* 
r* 
r * 

C* 

c*  ♦♦♦♦*  *.** 


DESCRIPTION  Of  PARAMETERS 


0 


U 


II 


AKH/  t f ONT*  INIPG  THt  DIAGONAL  Of  ?ME  ORIGINAL 

matrix  on  fniky  and  the  diagonal  or  thi 

AUXILIARY  MAIRIX  on  exit 

ARKAY  CONTAINING  THt  U0N-2EW0  OFF  DIAGONAL 
TtKMS  OF  T4lk  UPPER  lKJANGlk  OF  THE  OPlGlf.'AL 
WA1RIX  PLUS  SPACE  FOR  NONZERO  ( FF  UIAGOI  Al 
TERMS  CRtATtu  HY  THIS  ROUTINE  ON  El  TRY  rtM  THt 
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APPENDIX  F 

ITERATION  COMPUTER  PROGRAM  (SOR) 

A.  Far  Zone  Mutual  Impedance  Between  Moderate 
and  Distantly  Separated  Sinusoidal  Dipoles 

Calculation  time  for  filling  in  mutual  impedance  elements 
of  A has  been  improved  considerably  using  a far  zone  approxima- 
tion for  mutuals  between  general  skew  dipoles  for  dipole  spacing 
> IX.  figure  VT*1  shows  the  complete  bi static  pattern  for  a 100 
dipole  array  (8  dip/x3)  using  impedance  calculations  with  two 
criteria  for  the  far  zone  approximation;  > IX,  > 1.5X. 

Also  included  is  the  pattern  obtained  without  using  the  far  zone 
approximations  (exact).  Agreement  is  quite  good  over  these 
patterns  and  Table  Vl-1  gives  additional  data  on  backscatter, 

360°  bi static  average  and  computation  times  for  this  same  array 
using  the  various  methods  including  sparsed  matrix  solution 
using  the  10%  rule.  Figure  VI-2  compares  bistatic  patterns  for 
the  full  and  sparsed  matrix  calculations.  The  10%  rule  resulted 
in  approximately  90%  zeroes  in  the  A matrix.  Calculations  using 
the  far  zone  approximation  for  N * 1000  resulted  in  an  order  of 
magnitude  (1/10)  savings  in  time  to  compute  A.  The  predicted 
time  without  the  approximation  was  10-12  hours,  whereas  the  actual 
time  using  far  zone  mutuals  was  ^ 1 hour.  Any  errors  that  occur, 
due  to  this  far  zone  approximation,  are  not  likely  to  affect  the 
scattering  and  scintillation  statistics. 

These  simplified  mutual  impedances  are  computed  based 
on  the  far  zone  electric  fields  of  the  two  sinusoidal  dipoles. 
Consider  dipole  #1  located  in  Fig.VI-3a  to  have  far  zone  electric 
field  given  by 
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Figure  VI-1.  Bistatic  scatter  cross  section  for  100  dipole 
array  (8  di p/A^)  comparing  exact  and  far  zone 
A matrix  calculations. 
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Figure  VI-2.  Bistatic  scatter  cross  section  for  100  dipole 

array  (8  dip/X3)  comparing  full  (exact)  A matrix 
and  sparse  A matrix  using  10%  sparsing  rule, 
i.e.,  a..  = 0 if  la.J  < .1  |a,.l.  i - 1.  2, 
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Figure  VI-3.  Sinusoidal  dipoles  and  far  zone  approximations 


Consider  dipole  #2  in  Fig.VI  -3(b)  to  be  located  by  r with  respect  to 
Oi.  Then,  for  moderate  to  large  r , Eq.  (H-4)  simplifies  to 


^i  3 j ,<fi i ) Gg'  '2'^ 2^ 


where  pattern  functions  of  dipole  #2  are 
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where  the  field  pattern  functions  are  given  by  the  usual  radiation 
integrals,  i.e., 


(VI-2)  ^(6,$)  = I [T-j  - (r  • J,)  r]  e 
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Recall  from  Chapter  II  the  mutual  impedance  between  two  dipoles 
is  defined  by  the  following  formula. 
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and 


(VI-7)  62(e2>*2)  = r* 


I,  e'Jk^-r°  df 


The  (0 1 , i)  angular  variations  are  measured  with  respect  to  origin  0] 
(center  dipole  #1)  and  similarly,  the  (eg,  4>g)  angles  are  measured 
with  respect  to  origin  Og  (center  dipole  #2). 


1 


il 


B.  Computer  Programs 


Note  that  the  "INCLUDE"  statement  and  "CALL  ASSIGN"  statement  in  the 
following  computer  programs  are  special  commands  implemented  on  the  ESL 
computer.  Their  functions  are  explained  in  the  following  paragraphs. 


Nine  logical  unit  numbers  (0-8)  are  available  for  use  with 
Fortran.  The  nine  logical  unit  numbers  correspond  to  nine  locations 
in  the  I/O  device  assignment  table  of  the  Fortran  library  I/O  system. 
Before  I/O  operations  can  proceed  each  device  or  disk  file  to  be 
used  by  a Fortran  program  must  either  have  been  assigned  to  a logical 
unit  number  by  the  user's  program  or  have  been  assigned  by  default. 
The  device  assignment  table  is  initialized  to  the  default  assignments 
according  to  the  table.  Logical  unit  numbers  are  referenced  in  READ 
and  WRITE  statements,  to  specify  the  device  or  file  on  which  the  read 
or  write  operation  is  to  be  performed. 


Examples: 

READ  (8,-)x,y ,z 

WRITE (0) (a(i ) ,i=l ,100) 

WRlTE(6,40)a2,zL3 


Assuming  the  default  assignments  are  used  the  first  example 
specifies  that  three  variables,  x,y,  and  z be  read  from  the  terminal 
keyboard  in  free  format.  When  input  from  the  terminal  keyboard  is 
specified  the  terminal  bell  is  rung  to  indicate  that  the  READ  r'vte- 
ment  has  been  executed  and  the  user  is  expected  to  supply  the  i,..ut 
data.  The  input  data  should  be  followed  by  a carriage  return,  l.i 
the  second  example  the  WRITE  statement  specifies  that  100  words  be 
written  unformatted  (binary  format)  on  the  magnetic  tape  unit  0.  The 
WRITE  statement  of  the  third  example  specifies  that  formatted  output 
be  performed  to  the  temporary  output  file  named  .OUT. 


Any  of  the  system  I/O  devices  with  the  exception  of  the  card 
reader  (.CDR)  and  the  line  printer  (.LPT),  or  any  named  disk  file 
can  be  assigned  to  any  logical  unit  number  from  0 to  7 by  means  of 
an  OPEN  statement  or  a CALL  ASSIGN  statement.  The  user's  terminal 
is  permanently  assigned  to  logical  unit  8 and  cannot  be  altered  by 
the  Fortran  program.  Logical  unit  8 is  unavailable  for  assignment. 
The  format  for  CALL  ASSIGN  is: 


CALL  ASSIGN(FILE,USER,LU, 


where,  FILE  is  a literal  constant  of  from  one  to  six  characters  (see 
"Literal  Constants"  section  2-3  of  the  Fortran  manual)  or  a floating 
point  variable  name  or  an  array  name  containing  a one  to  six  character 
file  or  device  name.  USER  is  a literal  constant  of  from  one  to  six 
characters  in  length,  a floating  point  variable  name  or  array  name 
containing  a one  to  six  character  user  name  or  floating  point  zero 
(0.0). LU  is  a logical  unit  number  from  0 through  7.  N is  an  optional 
Fortran  statement  label  number.  FILE  and  USER,  if  less  than  six 
characters,  must  be  filled  with  trailing  spaces  to  make  six  characters. 
If  the  names  are  four  or  more  characters  in  length  this  Is  done 
automatically.  If  not  the  names  should  be  extended  to  be  at  least 
four  characters  in  length  by  adding  trailing  spaces. 


. . . , . . . . . 


If  the  array  or  floating  point  variable  is  used  for  a name,  data 
may  be  assigned  to  it  using  a READ  statement  with  an  A format  or  by 
means  of  a literal  constant  in  a DATA  statement.  If  floating  point 
zero  is  used  as  the  USER  calling  paramenter  the  user  name  under  which 
the  program  is  being  executed  is  assumed.  If  the  FILE  calling  parameter 
specifies  the  name  of  a non-disk  device  the  USER  parameter  is  not  used 
but  must  be  present.  A floating  point  zero  may  be  used.  Devices 
.LPT  and  .CDR  are  not  available  for  assignment.  The  function  of  the 
CALL  ASSIGN  statement  is  to  cause  the  specified  name  (file  and  user) 
to  be  placed  in  the  Fortran  library  I/O  device  assignment  table  in 
the  location  corresponding  to  the  specified  logical  unit  number  thereby 
assigning  that  name  to  the  logical  unit  number.  If  the  file  or  device 
which  was  previously  assigned  as  the  specified  logical  unit  has  been 
engaged  in  I/O  activity  and  has  not  been  closed  it  will  be  auto- 
matically closed  by  call  assign  before  a new  assignment  is  made.  If 
the  parameter  $N  is  present,  control  will  be  returned  to  the  statement 
having  the  label  N if  an  error  occurs.  An  error  will  be  indicated  if 
a non-disk  device  has  been  reserved  by  another  user  (i.e.,  the  device 
is  busy). 

Default  logical  unit  assignments 


Logical 

Device 

Description 

Unit 

Number 

Assignment 

0 

.MTO 

magnetic  tape  drive  0 

1 

.DSK 

temporary  (disk)  scratch  file 

2 

. MT1 

magnetic  tape  drive  1 

3 

.LU3 

temporary  (disk)  scratch  file 

4 

.LU4 

temporary  (disk)  scratch  file 

5 

.IN 

temporary  disk  input  file 

6 

.OUT 

temporary  disk  output  file 

7 

.LU7 

temporary  (disk)  scratch  file 

8 

terminal  only  — 

not  reass ignable 

The  INCLUDE  statement  provides  the  user  with  a means  of  specifying, 
as  part  of  a Fortran  program,  that  one  or  more  binary  object  files  be 
loaded  along  with  the  program  containing  the  include  statement  during 
thyload  operation.  The  INCLUDE  statement  is  used  primarily  to  load 
subroutines  called  by  Fortran  programs  or  subprograms  but  not  contained 
In  either  of  the  Fortran  libraries. 

Use  of  the  INCLUDE  statement  provides  the  following  benefits; 

1)  Frequently  used  subroutines  (not  contained  in  the  Fortran 
libraries)  need  not  be  edited  in  source  language  form  into  each  program 
which  calls  them.  This  saves  both  editing  time  and  file  space.  File 
space  is  conserved  because  only  one  compiled  binary  object  version  of 

a subroutine  need  be  kept  in  the  file  system  even  though  several 
programs  may  call  it. 

2)  Useful  subprograms  may  be  easily  shared  among  a number  of 
users  since  any  file  in  any  user's  directory  may  be  specified  in  an 
INCLUDE  statement. 
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3)  A subroutine  which  is  used  by  many  programs  may  be  altered  and 
recompiled  without  necessitating  the  recompilation  of  any  of  the 
calling  program.  (This,  of  course,  also  holds  for  a single  calling 
program) . 

The  format  for  the  INCLUDE  statement  is: 

INCLUDE  NAME! ,USER1 ;,NAME2  ,USER2 ; . . . ;NAMEN ,USERN 


(1)  File  Name:  TESBGF.SYSAC 

Main  Program  TESBGF  computes  and  stores  elements  of  Impedance 
matrix  (A)  and  seTs  up  SOI  submatrices.  Include  statements  (lines 
5-7)  are  as  follows: 

PAPER, SYSAC  CALL  PAPER  advances  output  paper  on 

LU-6  with  1H1  format. 


ZGS .SYSAC 
CLDB .SYSAC 
ADEXB .SYSAC 
STGETB, SYSAC 

ZSKEWB .SYSAC 
Dimensioned  variables: 


subroutine  used  by  ZSKEWF  subroutine 
SUBROUTINE  UNICLD 

contains  LDG  load-go-execute  subroutine 

contains  SUBROUTINES  STOR,  CLSTOR  and 
SUBFUNCTION  GET 

SUBROUTINE  ZSKEWF 


IJ 


integer  array  denoting  m^  for  N SOI 
submatrices 


X.Y.Z 

XX.YY.ZZ 

ZR 

XR 

ZDIA 


coordinates  of  dipole  1 

coordinates  of  dipole  j 

one  row  of  impedance  matrix  (A) 

one  row  of  impedance  matrix  separating  ZR 

into  real  and  Imaginary  parts 

(See  Equivalence  statement,  line  12.) 

diagonal  block  of  Impedance  matrix  - only 
1 x 1 for  2 segment  model 
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Bi 


Assigned  files  (lines  22-25): 

LU  3 contains  subscripts  of  SOI 
subms trices  (Binary  format). 

LU  5 saves  iteration  method  code 
(0  « J,  1 4 SOR,  2 = SOI)  and  OM 
(omega)  relaxation  factor  if  SOR 
is  used  (formated  data). 

LU  6 contains  error  messages  (lines 
149  or  152)  when  TESBGF  defaults  to 
CALL  EXIT  or  contains  bistatic  angle, 
Increment  and  iteration  start  infor- 
mation (formated  data)  for  TESBG4. 

LU  1 saves  number  of  dipoles  (NOD), 
number  of  segments  (NOS),  array  den- 
sity (DEN),  influence  coefficient  (CF), 
aspect  (TH.PHI),  time  (IT),  max 
submatrix  size  (ICK)  and  max  broad- 
side mode  voltage  (EBS)  (binary  format). 

Input  parameters  are  as  follows: 


HAFBIS 

one-half  bi static  pattern  sector 
(degrees);  if  <0,  bistatic  pattern 
Is  not  computed. 

DPHZ 

bistatic  angle  Increment  (degrees) 

ISTART 

Iteration  starting  step  (k). 

NOD 

number  of  dipoles  in  array 

NOS 

number  of  segments  per  dipole 

DEN 

density  of  array  (dlp/X3) 

METH 

Iteration  method  code  (0  * J,  1 - 
SOR,  2 = SOI) 

OM 

relaxation  factor  (SOR) 

CF 

influence  coefficient  (SOI) 

TH.PHI 

aspect  angle  in  degrees  (eo,$Q) 

Variable  names  used: 


ZZAT 

ZIND 

ZOUT 

DATA 


NOSP 


number  of  coordinate  points  per  dipole 


* -^V F 


NOSM 

N 

AK 

HK 

DK 

RS 

IP 


number  of  modes  per  dipole 
total  number  of  modes 
dipole  radius 
dipole  half-length 


segment  length 

overall  radius  of  array  (RQ) 

random  number  generator  starting 
number  (IBM-SSP  RANDU);  7 digit  odd 
number  preferable. 

Lines  77  through  139  compute  positions  of  array  dipoles  (UNICLD, 
lines  80  and  102)  and  mutual  impedances  are  then  computed  by 
ZSKEWF  in  line  121.  Note,  RHO  is  center  to  center  distance  be- 
tween ith  and  dipoles  and  lines  113  to  120  prescribe  type  of 
impedance  calculation  is  to  be  used,  e.g.,  INT  < 0 specifies  "far 
zone"  calculations  (see  Appendix  H),  INT  = 0 requires  exact  "closed 
form"  integration  and  INT  a 4 chooses  Simpson's  Rule  4-point 
integration.  Lines  128  to  132  apply  SOI  influence  criterion  to 
generate  SOI  submatrices.  Impedance  calculations  are  only  neces- 
sary for  the  upper  triangular  elements  of  the  impedance  matrix 
(A  is  symmetric).  However,  the  CALL  STOR  (line  137)  packs  and 
stores  full  rows  of  matrix  on  disk  storage.  The  symmetric  lower 
triangular  elements  of  the  A matrix  are  read  into  the  ZR  array 
(for  the  i th  row)  in  iines  89  to  97.  SUBFUNCTION  GET  (line  97) 
retrieves  and  unpacks  previously  stored  data  from  the  disk  to 
fill  in  the  i™  row  for  j < i.  The  CALL  CLSTOR  (line  142) 
permanently  closes  all  "packed"  storage  disk  files.  Once  this 
is  done,  files  can  only  be  read  using  the  GET  subfunction  contained 
in  binary  file  GETB.SYSAC  found  in  main  program  TESBG4.SYSAC. 

Line  157  automatically  executes  TESBG4.SYSAC  (BIGCO.SYSAC)  which 
solves  the  system  of  equations  via  the  prescribed  iterative  method. 

(2)  File  Name:  TESBGl.SYSAC 


Main 


ram  TESBG1  is  identical  to  TESBGF.SYSAC  except  it 

fl 


prog 

does  not  use  "far  zone"  calculations  for  mutual  impedances,  but 


instead  uses  only  closed  form  and  Simpson's  four  point  integration. 
(3)  File  Name:  TESBG4.SYSAC 

Main  program  TESBG4  solves  simultaneous  system  using  either  J, 
SOR  or  SOI  iteration.  Compiled  (binary)  version  of  TESBG4  must 
be  under  file  name  BIGCO.SYSAC  and  is  executed  by  either  TESBGF, 
TESBG1  or  TESBG5.  All  input  data  for  TESBG4  are  available  on 
disk  files  ZZAT,  ZINP  and  DATA.  Parameters  are  identical  to 
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definitions  given  for  TESBGF,  except  for  ITE  which  corresponds 
to  Iteration  method  code  (METH). 

Assigned  files  (lines  21-29): 


PLOT 

LU  $ will  contain  bistatic  cross 
section  pattern  output  data  (formated 
data). 

ZZAT 

LU  3 same  as  for  TESBGF 

ZAOT 

LU  4 sample  of  output  which  can  be 
read  without  removing  program  from 
"background"  running  mode  (formated  d< 

ZINP 

LU  5 same  as  for  TESBGF 

DATA 

LU  1 same  as  for  TESBGF 

ZOUT 

LU  6 contains  output  data  from  iter- 
ation (formated  data). 

All  iterations  are  performed  between  lines  93  to  222.  CALL  EZFFD 
sets  up  excitation  column  (b)  and  lines  98-129  solve  N subsystems 
using  the  SOI  submatrices  and  SUBROUTINE  SQROT  (Cholesky).  Lines 
130-156  compute  the  residuals  for  SOI  (line  148)  or  solve  system 
via  J or  SOR  (lines  150-153).  Lines  157-159  save  "latest"  solution 
information  in  the  event  the  iteration  is  stopped  and  restarted 
with  ISTART  f 1.  Lines  160-175  compute  residual  1-norm  ||r'R'|h 
and  lines  176  to  196  compute  bistatic  cross  section  pattern  SIGG 
(x2).  Bistatic  pattern  is  written  into  file  name  PLOT.  Line  197 
computes  bistatic  pattern  average  (SIG)  oyer  sector  and  line  198 


.285 


computes  normalized  average  residual  e(k^.  Lines  199-204  com- 
pute total  scatter  cross  section  ct(TSC)  via  Forward  Scatter  Theorem. 

Lines  205-219  write  and 

rewrite  output  data  in  following  form: 

■ 

I PEP 

iteration  k 

* 

SIG 

bl static  average  <a> 

A 

(k) 

e norm 

TSC 

total  scatter  cross  section  o- 

T 

ETH 

forward  scattered  electric  field 
(complex) 

Cl ( N)  • 

dipole  mode  current  on  dipole 

(complex) 

i 

, . .u.j  —rrx^: 


—4* 


II 


Reading  and  writing  into  LU  4 and  5 allows  the  latest  accumula- 
tion of  output  data  to  be  observed  without  removing  program  from 
background.  Final  output  is  accumulated  in  file  ZOUT  and  is 
closed  by  escaping  (ESC)  program.  Note,  a backscatter  data  are 
available  only  in  PLOT  as  the  "center"  data  point  in  the  bistatic 
pattern. 

(4)  File  Name:  TESBG5.SYSAC 

Main  program  TESBG5  is  a utility  program  to  be  used  to 
execute  YESBG4  (BIGCO)  when  a new  impedance  matrix  is  not  re- 
quired. TESBG5  has  two  modes  oT"operation.  Both  modes  request 
input  data  (same  as  TTsfeGF)  in  line  18,  then  PAUSE  (line  19). 

A transfer  directly  to  TESBG4  is  affected  at  this  point,  by 
pressing  ESCAPE  (ESC);  however,  file  ZINP  must  already  have  the 
prescribed  method  code  written  on  line  1 (and  relaxation  factor 
on  line  2)  in  any  format.  This  mode  is  especial'y  useful  when 
changing  bistatic  pattern  cut  or  restarting  SOR  with  a different 
relaxation  factor.  The  second  mode  is  initiated  by  pressing 
RETURN  after  the  PAUSE.  The  "old  data"  will  be  displayed  and  a 
request  for  new  parameters  will  occur.  This  mode  can  be  used 
to  change  all  parameters  including  SOI  matrices;  however,  it  is 
most  used  for  changing  only  the  desired  aspect  angle. 

(5)  File  Name:  UNICLD,  SYSAC 

SUBROUTINE  UNICLD  computes  position  and  orientation  of  one 
dipole-at-a-time.  The  calling  parameters  are  as  follows: 

IX  random  number  initialization  on  entry 

and  next  random  number  in  sequence  on 
return  to  main  program. 

RS  random  array  max  radius 

HK  dipole  half-length 

DK  segment  length 


X.Y.Z 


number  of  coordinate  points  per  dipole 

dipole  coordinates  returned  to  main 
program 


Subroutine  call  to  RANDU  uses  following  I/O  parameters: 

IX  random  number  initialization 

IY  next  random  number 

A1  uniformly  distributed  random  variable 

in  range  0 < A1  < 1, 


; 


***** 


mm 


0 

0 

U 

D 

0 

D 

D 

D 

0 

G 

0 

D 

0 

0 

D 

C 

0 

G 

0 


(6)  File  Name:  ZSKEWF.SYSAC 

SUBROUTINE  ZSKEWF  computes  mutual  Impedance  between  two 
genera 1 sTew  cTipol es . Calling  parameters  are  as  follows: 

XA, YA,ZA 

XB, YB,ZB 

XC, YC,ZC  three  coordinate  points  of  dipole  1 

XI ,Y1  ,Z1 
X2  Y2  Z2 

X3 ^Y3 1 Z3  three  coordinate  points  of  dipole  j 

INT  type  of  calculation;  INT  < 0 ■ far 

zone  approx,  INT  ■ 0 closed  form 
Integrals,  INT  a 4 Simpson's  Integration 
(4  pt.). 

CDK  Cos  (DK) 

SDK  Sin  (DK) 

D dipole  half-length 

R center- to-center  spacing  between  1th 

and  dipoles. 

Z12  mutual  impedance  returned  to  main  program. 

Lines  5-31  calculate  far  zone  approximation  and  lines  32-50  calcu- 

late "exact"  values  using  SUBROUTINE  ZGS,  a standard  Richmond  sub- 
routine for  calculating  mutual  impedances  between  two  general  skew 
monopoles. 

(7)  File  Name:  EZFFD.SYSAC 

SUBROUTINE  EZFFD  computes  far  zone  electric  fields  scattered 
from  random  array  assuming  one  ampere  of  current  flows  on  each 
dipole.  Calling  parameters  are  as  follows: 


X.Y.Z 

array  dipole  coordinates  (dummy 
variables) 

ET,EP 

A * 

e polarized  and  4 polarized  electric 
fields  (dummy  variables) 

ETT 

e polarized  electric  field  (N  dimen- 
sional) returned  to  main  program. 

NOD 

same  as  TESBGF 
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same  as  TESBGF 
same  as  TESBGF 
same  as  TESBGF 
same  as  TESBGF 
same  as  TESBGF 


same  as  TESBGF 


CTH  Cos  (0)  scattering  angle 

STH  Sin  (e)  scattering  angle 

PHI  $ scattering  angle  (degrees). 

Subroutine  regenerates  random  array  with  UNICLD  and  calculates  the 
far  zone  electric  field  of  each  dipole  using  SUBROUTINE  ZFFDt  a 
standard  Richmond  routine  for  computing  the  far  zone  electric 
field  of  a single  skew  dipole  located  near  the  origin. 

(8)  File  Name:  STSETS.SVSAC 

SUBROUTINES  STOR,  CLSTOR  and  SUBFUNCTION  GET  are  listed  here 
in  assembler  programming  language,  the  assembled  version  of  this 
program  must  be  included  in  TESBGF  and  TESBG1  under  file  name 
STGETB.SYSAC. 

(9)  File  Name:  GETS.SYSAC 

SUBFUNCTION  GET  is  listed  here  in  assembler  language.  The 
assembled  version  of  this  program  must  be  included  in  TESBG4  under 
file  name  GETB.SYSAC. 


'm/A* 


M»f  1 


nwr.irm 


thi<  proo»am  computes  mutuae  iP®ru*NCi  matptx  pop  n client 

PAACO"  AKPAT  OP  PrS0*t»«T  OlPOtfA  ANP  PPOCE*SCS  THE  PA?P|X 
PON  uSE  I"  lESBOlt  mmIcm  COMPUTES  Thf  PaDA*  rxOSS  SECTION  ST 
«/ACPul<  sop  ap<>  sri  iteration  rriHOPS*..... 

INCL'jQE  PAPF«.bYSAC|2GA.SYSAC 
INCL'.'Ob  C10|..STAACI*UEX8.SVS*C 
INCLUOt  SlCf Tn.SYSAClZXXEWP.AYSAC 
INTC'.fR  IJTllM 

OlMfSJrN  >|*l  tXH»I.V<9I.YV<a|,Z(S>.ZMS) 

COMPU  X Z'HJPOPI 
OIME«SION  XRlJAOIll 
couivAi.cr.ee  izh<i».>r<ii» 

COMPLEX  CJI.ril«Pli,P2i«M2P 
COMPLEX  ECC.Y0IAIS.5) 

PATA  PI.TH,CTA/4.1Xl*>A,k.pA3iB.»7*.TPT/ 

oata  cui/«n.,'»-.YSo»»er-ii!»/ 

CALL  CSC<A10<<0I 
WPITM6.71 

7 CoPHATMX.'HM.r  P1STATTC  AES.  INCP  S ISTaPT  ■•» 
P£AOI8.-lMAFRlS.r>PM2.  ISTAPT 
CALL  FEAR  10) 

CALL  ASSir.M(*HZ?»T.EHSYSVCf  .41 
CALL  AbSU-M«M2l*P.tHSVSVCi.3> 

CALL  ASSir-A|<«HZOUT«SHSYSWCT  «fc» 

CALL  A$SI<iN|aHOAT  A . 6HSVSVC  I lit 

lonsiib 

UPITE|8,»Sfll 

POP  FORMAT ('HEAD  MO3.R0S.nEN.MCTH  ■•» 

PCAU<P.-1*'OP,NS.('CN.PCTm 
URlTMP.2INrn.NS.  JCN 
UPJTf Ib.-IMCTU 
IFIM»  TH.f.E.H60  TO  A 
UP1TME.SI 

• format < • peao  pmesa 

PCAO<a.-)OM 
UPl Tr 1 3.“ 1 0* 

• foPN»T < IX,  'itcLr*'  «1IA»PX»  *PSfS»*»IH»M»,CCC  PENSITTp'.IeS.II 
X UMlTCIP.Sl 

« popmat  < *REAO  I THRESHOUJ  ••} 

REAO<a.-)C f 
WRITMb.SIC  r 
S FoPMA TIIA.'C*' .lC7.il 
IS  NoSrNS 

wpmu.toi 

ttt  foPMaT<»  HE  AO  TH.  PHI 
PEAOie.-MH.PHl 
uPirrtP.ePAiYH.PHi 
sax  popmat i #tm.  pht  ■••uev.si 

CALL  OlASAN 


THR«TM»,U17»*S 
PNRfPhI*. 017X95 
CAIpSIMTHR)*COS<PHPI 
CSIaSIN <THPI<S1N<PMP  I 


CSIaCOSlTHPI 
CALL  SbTCPUT) 


nmr.trw 


NOSPafcOSal 

NOS*aM>S-l 

NHaNOpaMIS 

NPsNO()*NOSP 

NM0a»'0SP-*0*/t 

HLa.PAbT 

CKaTP/ld 

NeNOPaNOSA 

ZOS«*iOU»TP*TP 

ALsMt  /ITO 

AKzAL*1P 

HAsMl.aTP 

0Ka2*MH/N0S 

COK*rOS»OK» 

SOKsSIML'K  I 
ANPSrfK  r/f’tf' 

AS* • <>?t  !5*  *PPS»»  ( 1/8.  I*TP 

IPzT»A*lll 

nibmos 

ICKBM 

IXalP 

CO  8?  laj.w 
IF(NI.LT.fOSl60  TO  St 
ITalV 

CALL  UNJCLOnX*AS«HAiOP.NO*P»».T»t» 

Nlal 

»•  liafil 

ItaNlat 

UaNlat 

MJaNl’S 

IOXa( I«ll/hP4P*l 

INCU 

IFII. CQ.IUO  TO  so 
ISLal-X 

00  40  UZdi'SL 
KPat«4»(lNZ>|l 
KIaKPaKP-1 
JPsINZ+lNZ-1 
no  40 

JPaJPalO  ' 

KIaKT*IN 

40  VRlJPIaGLTIHlI 
SO  00  SO  J«1.4 

IFIJ. LT.IUO  TO  (4 
I0J««J-»l/N04Pai 
IF«4J.tT.P0S>S0  TO  91 

CALL  UimLO<tV’*l<HKfOK«NOtPi*XtVVttZ) 

NJal 

St  J»*NJ 

JZaNJal  . * • 

JSaNO+Z 

INTaO 

IOIA*J-NOS»*(ini-ll 
JOXAa J-NOSA* ( IOJ-1 ) 

XFUOI.Nt.IOJJSO  TO  SI 


I p 

I u 


TIMW.IWC 


IF(ini.fll.l>«0  TO  74 
CO  TO  04 
tl  tuT«-l 

OHOBseHTUkTiMriD'kiriMPiivnun^oi-KiM^oiuiTTiNooi-vdihOM* 

IFIBK0.6T.CmGC  TO  s« 

IMTafl 
60  TO  06 

04  TFCRH0.6I ,YF|SO  to  54 
IMT»» 

5*  CALL  2GKL6F(X(fl>.V(tl).7(|ll.X(iai.V(l?|.2(Ty|.x(ia>,V'lA>< 
XXI  T4l.YXmi.VVin>  .22(11  >.VVU*>.rvm>.ZZ(t»>.XXUl>.YV(Il> 
4.72(131  .I*iT.C0K.S04,M«.4hu.2*(J>) 

IF ( 1 r I.lfc.tC.I>Z0IA(ini»,jnT4>«zX(J> 

Z04aCAMS(70I •(  UlA«IL'tAI> 

60  TO  44 

It.  7A(J|b7O1A(IUIA.J0TAI 
•4  IF(CAHc(2M(J(>,Ll  . CF»20**|  40  TO  04 
INal'Vl 

1F(IK.UT.ICK|1CK«1|N 
TF(lCK.fiT.l»>t60  TO  64 
IJ( 1 M I au 
4(1  FjaLJtl 

IF(lCH.GI.lP«>Srt  |0  41 
WRIT>  (3>IK ,(IJ( JO.jFaJ.lW) 

41  tMN«a 

CALL  ST0R(2R(l>.IS.It44| 

IF( IF4H.AI ,0 >60  TO  44 

44 

CLOSt"  4 
CALL  CLSTOR 
CALL  6tTCf‘(Jv> 

ITs(.iT«1T>/1«0 
tSSa. 7*76741 46 

MBIT,  ft  >600, KJ.OfM.CF. TH.FmI.IT. ICK.CB!* 

IF ( Ira ,6T.in*.AN0.6CTHatOa7>40  TO  SO 
60  Tr  54* 

14  UNlTC(*.4tl> 

• 11  ao4HAT(  IX.  'PVfFFLOW  RANG!  IH  460*1 

60  TO  100P 

15  UNlTC(A.4ia>ICN 

• 17  FtlMXATIMAX  014  1XCCC0C0  ICKa*  .1 14l 

GO  TO  1000 

lid  TlOSC  6 ' ■ 

•Of  CALL  ASS166 (4H700T.4HSYRVC I .41 

WRITC(6,->HAF«I*,07h2,I4TA7T  ' / 

CALL  L0(i(9Hf  TGCO.OMOYiAL) 

1400  CALL  CXIT 
CNO 


L 


. 


Ojfe^TJ 


PA»C  1 


TCBMl.mtC 


1 

2 

3 

3 

s 

6 

T 

e 

* 

jo 

11 

12 
13 
13 
13 
It 
17 
1« 
13 

29 
21 
22 
23 
23 
23 
2t 
27 
26 
23 
S3 

31 

32 

33 
S3 
33 
St 
37 

36 
33 

30 

31 

32 

33 
33 
33 
3t 

37 
36 
39 

30 

31 

32 

33 
33 
S3 


THIS  PROGRAM  cOMPliTfS  MUTUAL  IMPEUaHCE  MATRIX  FOR  N ELEMENT 
RANoOM  ARRAY  OF  RrSON'Nl  PIPOLES  «Nn  PROCESSES  THE  MATRIX 
FOR  llSC  I*-1  TFSEdi  vHICW  COMPUTES  The  NA0A«  CROSS  SECTION  BT 
JACOBt,  S'»R  (,H0  SOI  ITERATION  HrTriOnS...... 

OPTION-;  S2K 

IAiCLUU*  PAfrR.FYRAtlZiiS.SYSAr 

include.  ctop,srSfCiAorx3,srs»c 
TNCLIHJ*  STbl  TR.SYScC 
DIMENSION  XCUSVIll 
CO"30N  XC 

INTEGER  U-(  1151  1200) , I JJI 1151 

DIMENSION  X<5>.XX(5!,Yt5l,YY(3|,7<3).ZZ|MI 
CoMPLF  a *R(l?(>Rl 
riOENSION  XH | 00 ) 
roUiVAIENc)  (7n(l  | ,XH(1)  ) 

COMPlE*  CC I 3670  • 

CgUlVAi.EACE  IXrlll.CCtlH 
COMPLE’  tjJ.PlnP12.P21.P22 
roRPLE»  tec. 2013(3.31 

PAT A P;«TP.ClA/3alhl39.t.2P3]S. 376.727/ 

DATA  CJI/<0.0,-.t>  M16B6E-2)/ 

CALL  ERCISICOO) 

WHITE (".7) 

_ 7 FoOOATtlX.*HALF  PJSTATIC  AN6.  1NCR  6 ISTaRT  «•! 

REAOIP.- JHAPeiR.I'PH2.ISTAHt 

CALL  F»RH  101 

CAUL  ASSlGUmHT/AI.GHSYSVCI.Xl 
CALL  ASSlbM(3H7lHP  |6HSY$VC  I .3) 

CALL  APSIG*  HH70UI  .fcHSYSVC  I .Al 
CALL  AFSXbNI3HOATA.6HSYSvCI.il 
1U3R113 
WRITE <t,2S0) 

23n  FoH(1AT(*HEAC>  NOO.NOS.OEN.pETH  ■«  | 

REAO(6.-lNOO.NS.riEP.PETM 
WRITE  iH.ilNCO.A'S.OEN 
WRITE  1 3 •* 1 HE  TH 
TFIRETm.Ne.IIC.0  TO  3 

WMlTEC',31 

3 roR«AT(«  READ  pNEG#  «•»' 

SE*016.*lCM 

WNlTEII.-IOM 

• FORMAT ( 1 x , •hELF»'  .1 14.2X , 'HSrex' .1I2.2X. .ELE  nChSlTTai.lE9.il 
3 WRITCIA.91 

9 FORMAT  I f HEAD  2 THRESHOLD  ■ 
pea-jib, -ICE 

WHITEIP.AICF 
S FgRMATIlX,iCs»,tL9.3l 
is  NjSsNS 

WKlTElA.AUl 

20  FORMAT  I*  RE  AO  TH.  PHI  8t| 

PrA016.-ITH.PHT 
WHITE  1 3, 063 ITH.PHI 
86*  FORMATIMH.  PHI  ='.2L?.S) 

call  ofassn 

TkRfTH*. 017353 


292 


mim  ~ ffr  tl 


0 

0 

c 


0 


i u 

I 


I 0 

Id 


PnR*PHta.017H5H 
rAl«SlMTpR>»CnS«PKRI 
CbTaSI' (ThRI«STN(OhRI 
C .,I*COS<  Th*  I 
CAtL  t,«  TtPUTJ 
NOSP=NOR*1 

»'US*=NOSM 

PpcNOb'NOS 

A'PeNOCmNOSP 

P*0*MOVP«M)Si/» 

ML*.?ir-7 

rK»TP»rp/iou 

►isNOu*'iOSfl 

TuS*36’10*TP»TP 

*L*ML/100 

«k*al*tp 

MK*HL*TP 

pk*}*hh/moS 
CnKcCO'MI'P  I 

St)K»S|  (UK) 

ANOSaN  W/PLN 

PS*.6i" Ji*Anos**Cl/3.»aTP 
IpaTjfl’lll 

M|*NOS 

UKafl 

1X*IP 

no  82  1*1. N 

lFlNI.IT.fcOSICO  TO  St 

TT*IX 

CALL  U1  lICLlll  IX .88 . HR « OK iNOSP. X. Y.Z  l 
*'1  = 1 
S»  Il*NI 

IjaNUl' 

A'j*NOS 

TUl«  I I-H/NOS**! 

INJIIIsO 

IF  (I. (.'1.1)00  TO  SO 
IKL*I-T 

no  SO  T N2*l  • I R| 

KP*lAN«<lN2*n 

KI*KP*‘'P-1 
JPS1«JT*IN2-1 
no  HO  I**0»1 

JprjPAtM 

NgaNlAin 

Hfl  ««l JP)=r,tT«X|l 
Sn  no  So  jsi.m 

TP  ( J.LT  . I ) 01’  TO  PH 

IOJ*l J-l l/NOSP*l 

IF«NJ.I.T.f(OS)RO  TO  S3 

CALL  UllCLOIIT.*S.W»nK.NOSP.M,TT«K5 

►'.1*1 

93  J1=NJ 
0»*NJ*1 


. ****T>-**,  * 


M«C  > 


TCtMl.lVIAC 


0 


I 

j 


111  J3»NJt? 

112  tnTci) 

113  TOlAcI-NOsP«<inl-ll 

11*  .lul  AsJ-NLSN*  ( 1*J«1 1 

113  TFllUI.Nt.ICJIr.O  TO  SI 

113  IFll01.Nt.D60  TO  76 

1U  «0  TO  *>6 

11*  #1  tnt** 

11*  00  33  *1*11 « IS 

12U  ro  33  FJBJ1.J3 

121  PhOS*  I XX  <*ij)  «x  I HI  I I • ( XX ( Hjl-V  (nill*IVTlFjl»Vl**ll  I • < TV IR Jt* 

122  SYlHI>l  + </Z<*J>-Z<l'I>l*<l7<"JW<H!l) 

123  U <AH0*.6T,CN|*fl  TO  33 

12*  TNT*D 

123  60  TO  3* 

126  3*  roNTINi'f 

127  36  7AlJ)x(0.U<0.0) 

123  CALL  Zl<S<xm>.YIIl>,ZMl>.X»I2l,YU2l.7il2|,XX<Jll.YY<J1» 

129  A. 2Z< Jl I .XX <J2 1.  VY< J2 ) .2Z< .AK.OK. CO*. SOK.DK .SOP • INT.Pll .PIP. 

130  AP2t.PZr> 

131  7R<JI>7R<JI*P27 

132  call  Z'<S<X<  III  .Yl  II I >Z( III >Xf IJI »Y<  T7I .7) 121 .XX< J2I .YY< J2I 

133  t.7Z<J2).XXtJ3|«VY<j3).2Zlj5t.AK .OK .COK.SOK.DK . SOK  < INT.Pll .Pit* 

13*  SPZl.PZ.'l 

133  Zfc<JlcZA<j|4P2i 

186  CALL  Z<<S<X<I9>.Y<I2I.ZII2I.X(I3l,V<T8).Z|ISt.xX<Jl>.YTIJl) 

137  8.7Z|J1I.XX|J2I.TY(J2I.ZZ(u2|.  AK  .OK.cOK. AOK.0K  «80K  .1NT.P11.P17. 

136  3P21.P22I 

139  7R( Jl*7«( J)*P1> 

1*0  CALL  Z(((x(I2).Y(I?>.Z(I?|.x>IAI«Y<T3l<ZlISI.XX<j2l.YY<J2) 

1*1  »,7Z|J2l.7XlJ3).YY|Ji|tZZlJll,*K,rK.eO«.RnK.OK.«OK,XNT.Pll.Pi». 

1*2  3P21.P27I 

1*3  ZhUI*7R<jI*PH 

1*«  TF<inl.ew.ll>JI?OIMIOIA.JMA>*ZRtJ> 

1*3  2oP*CAI<SIZDl  A(  TOI  A.  |0t  A)  | 

1*6  «o  TO  ** 

1*7  76  ZNIJIsZOlAIIOIA.JOIAl 

1*6  6*  tfICABRUhIJII  .LT.CF*ZO*I60  TO  00 

1*9  1N<J<1ICINJ<1I41 

ISO  TNclNJIll 

131  IF<lN.r.T.IbH|60  TO  IS 

132  !F<lN.r.T.lCH|lCK*IN 

IS*  T.ll  IN|cJ 

13*  *0  NjbNJfI 

133  WRITE! JI1N, <1J< JKI.JKml.lNI  ' 

136  16>N*2 

1ST  CALL  3T0H (ZH< 1 1 .13. 1CRR) 

136  TF<UR*.NC. 010ft  TO  1* 

139  •»  N|BNI«1 

160  CLOSE  3 

1*1  CALL  CLSTOR 

162  CALL  GFTCPIJT) 

163  IT*. jT«IT 1/100 

16*  COS*. 2*267*196 

169  imITCUINOO.NS.DCN.CP.TN.PHl.lTiICKiCM 


0 

D 

D 

0 

D 

0 

D 

0 

D 


Tc«ec*.trs«c 


COMPUTES  SC.TTFk  CROSS  SECTION  OF  ti  ELEMENT  RANDOM 
iy'Sl  * ^t0°T'  'C'«  * SOJ  1TFKA110N.  Mi i TOft  IMPEDANCE 
IOPTK-4St1>;FB  r'C£SS£°  0T  TESBC1,'  “SB®  or  TI5B0S...... 

INCLUDE  E^FFn>STSAC|SOP(jrPiSTSAC 
INCE'OE  CLIih.SYSaCI?FFPiSYRAl 
Include  i*».wr o >r t sac ir r tu«sv«;ac 
dime' *s ion 

COMPLEX  CC<6«7uliCCItl1a) 

INTfi.CN  1.1(111) 

ZIU'.'V0*  xIM)»»I((M.Y(S)»yVI5J»2|?I»?x(S( 
DIMEMSXL'N^XMtfRPfn^  '•TTTll2’I)0l«itR(  120*) 

CWUIP/LINCE  C/Mn,XRIi,,,',ccaitxca)| 

COMMON  ct 

Jr®*^1**  CJI.FTTiFTP.FPp.FPY.tTH.EPH.Er.EP 
DATE  f'I.TH.rTA/J.14l59,(,,aAA1#tST6.T*7/ 

DATA  C J)/(r.n.-.sj0Sf SF-sl/ 

CALL  CSr<">RM 
CALL  fLRP  (0) 

CALL  I SSIG.M  | 4HZ0UT tbHSYSVC I it  1 
PEA3(  6.  • I H«Fn IS #t’PH2»  IS1  ART 
PISTAT=hAF0IS*? 

CLOS*  A 

CALL  ASiIGN(«MPL0T»6»'SYSVC*  • U | 

CALL  AhSlGN(u**l?A  T «£PSYSVC  • • A) 

CALL  ASSIGN! 4 h7 ANT  tGNSYSVC  1.4) 

C*LL  ASS!GM4M7I»'P.tti<;YbVCt  .3) 

CALL  AMSl(iM(UHr  ATAiCHSYSvr  I tA) 

REAIM  1 I N(M  ),()•>,  tfif  Tm.Pmt  ilTiICKiCbl 

iFcioTART.eo.ncLosr  i " 

WRIT*  ( fe  I 3 | NOOtf 

8 CCnM2:;^rS’’1,,‘*?’,’,''Sr<5“,’,I,*a,‘-*C‘-t  OENSITYb 
lo  format < • j=i. , *oft*it  sn=2  , •> 

READ i 5 • - ) I Tr 
IMITt.Cf.O » WRITE (6,2) 

9 FORMAT  < IX,  •uftCfiBl  • ) 

lMirr.NL.2IP0  TO  12 
WRITE!*,*) 

* foRmaT(i*,«:,otm 
12  IMITE.NE.DG0  TO  li 
WRIT*  (0,14  ) 

IN  FORMAT ( • UHGA*  • ) 

REACH  3 1 - lOMcr.A 
WRJ  TMf  ,4  IOMFGA 

4 FORMAT ( 1 A . • SOL • «2X  , ’OMEGA* • , 1 Et.S ) 

l.A  NOSsNS 


REWINO  S 

WRITE  U.,e«4 tTH.PMI 
9*4  FORMAT I • Th.  PUT  f*.2E9.3) 

WHIT*  (b.OIIT 

A FORMAT ( * TINE  TO  COMP  2 « • • 1 T lk . • SLC • I 
WRIT* (bill)CFiICN  * C 

11  FORMAT (IX.'Cb'.ICR.SiPX < *MAX  01Mb* .1131 


Ttiin,ifi«c 


CALL  OLAJ.SN 
TH4*fM«.{>174AS 
CALL  GtTCPIITfl 
MOSP-MOW 
flOS-'Unor.-l 

MMsAIIO^MGS 
(gP=fi')r>»f,OLP 
HHOcKOSP-r  PS/2 
HL  = .Mt7 

ckmpmp/ioo 
Nsaioi  »mosai 
AL=HI./Iuc 
AK -At.  *1 P 
HK=ML*tP 
nK  = 2*HK/M.S 
COKsCQMt Kl 
soKssimt-K i 

ANOSsNOO/ijEA. 

«S=.»  2<'At>»AMfiS*Ml/3.l*lP 

CHS=.2P?*741«4 

ews*" 

PAt.nuM  AH1'  AT  A 1 
IP=2' A041J 
RAtjPo*  AK'MI  *( 

IP=7-‘A?111 
NI=h»S 
102  n2  = l 

C T H = r OS  ( Tt'H  ) 

SThsS  Jt>  ( TPR  I 

lMISTAP.I.EP.nOG  TO  121 

HEAUdl  lSTABMICJIJK)  ,CI<  JKI.JKsl.NJ 

ISTA*T=iStAAT*l 

CL()Sf  1 

GO  TO  121 

121  00  124  IKAsl.M 

124  riHFAlsUi.'JiO.OI 

125  IP«  = 1 

00  94J  iFt PcfSTAATtlCOO 
Aso 

PM2=OMl 

CALL  E2FPlMT«rt2trT.rPtCTT.AIOo«7*OSn«NOSPtlP.IU.HN.CK«CTH«STH«PHZI 
IMITr.MK.21GG  TO  131 
TM1PCP.M  .1  ISO  10  123 
00  122  1=1 ,h 

122  ( j<li=-r.iTU)*rdi 

123  no  130  L*1«H 

G£AU(3)IN,<IJ<JK),JK*1,IN) 

no  t>rn  i = i,i»t 
iDiztjin 
cctinscoiiOTi 
no  b^n  0=1,  x s' 

lOJMOtJI 

IUF=10J«MUnI-U 

KIM1-l>*l’l-fI*I-ll/*«J 

iofmok+iuf-i 


IM4. 


mff.*?*  .\t< 


KI*Kl«ftJ-l 
00  4*0  IhBOfl 
I0F*l0f*Ih 
KI*KT*ln 

*40  vclKIIsGLMlnF) 

CALL  SLXOTICC.CCI.O.l.INI 
IF  ( I I.Ui.NIGO  10  12A 
00  *PS  1*1, If' 

IFIIJI2I.NC.IIA0  TO  MS 
CT*Cr 1 I 1 | 

go  in  gal 

*55  roNTIfMC 
*5*  ri«L)*(  I(D*LT 

150  foNT!N"f 

ACJImO  4 
60  TO  141 
12*  no  179  1*1 »N 

126  r | ( I ) cr  cl 1 1 ) 

151  ruNTIMC 

00  145  11*1. N 
1*12 

IFM»K.LT.riT*N-II*l 
rPBlC.O.O.Ot 
00  14*  J* 1 • N 
N2bj4M«(1-1> 

JP*J*J-1 
KI*Kl4*l-l 
DO  1 46  10*0.1 
i JP*jr*l« 

KIsKl  + lfl 

is*  »mjp>*Gtnhn 

IFlITF.Mt.Z.unn.T.Cu.JlGO  TO  ISA 
136  FP*CP«/RIJ>*CI(J) 

136  CONTINUE 

r.i*tTTiu«cji 
CTTN*CA(jS(CTI 
IFlcm.fcT.rpS»CBS*CTTp 
177  rjlll—  CP-tT 

IF! 1 TC.IQ.7I AO  TO  135 
C«HII*CJII)/?R(II 
IFlITr.M.llAO  TO  145 
C2  11  1>»CI  (1  »*n*t  r,»*»cJCI  l-CTCIl  I 
135  CONTINUE 

1FI1TC.NI.0IA0  TO  161 
00  1*1  1*1, N 

t*a  riinx  Jin 

161  WMTTCH  |TOO.NS.OC'i,CF,TM,PHI,IT,ICK,fB* 
WRITMIMPCP.ICJIJKI.CKJAI.  M*1,N» 
CLOSE  1 
10KS-IVK 
00  160  1*1. N 
CP*<0.C,0r,0| 

CT*ETT(II*CJT 
00  16*  J*1.N 
«I*J*N*(I-1I 


TUHtilTUC 


* 


JPBJ.J-1 
KI*KI«K1-1 

no  X^S  I«*0.1 

JP*J|'«1P 

ki*m*m 

199 

196  r^*CP+7R( J)»CI  < J) 

«*CAi'S|CP*ET) 

»=*♦*> 

i«o  rowriN  ic 

IF  I H*Fb IS >149.166.166 
169  PhZsPHI 
OPhZ=0 
INIJfisI 

r.0  T'l  1(6 

166  TNUHsHAPMS/OKMZ 

PH?sPHI.(|P'HZ*ir.’U» 

INUM*If<UF*2«1 
166  610*0 

00  1*4  ITI**1«1,'U6 
lF<HAFtiISH6A.lt7.16T 

167  CALL  E7FFi)(><,r.7.CT.CP.tTT«NPn.NOSH.6OSP.IP,e(,HK.0K.cTH.STH,PHZ) 
166  rtH* I 0. 0 .0.0 ) 

oo  iso  1*1. w 

ISO  CTH*eTM*ll<l»*crTT|l| 

ETMaCAfSO  TM) 

SIGU=6*PI*ET**f IR 

siocSIo.sigo 

MRiTriu.iUPpP.PuZ.SlCG 
1 FORMAT ( 1 x.114.77. ire. 2. ZX.lC6.il 
196  PhZ*PmZ ♦LPmZ 
„ siGxsio/i«iun 
A*A/i/ins 
PrtZ*PHI«100 

CALL  CZKFlM  7.T.Z.CT «EP «CTT« HUq < NOSH ,NOSP« IP . At <HK .OK .CTH.STh.PHZ  I 
CTHs(O.O.U.O) 

DO  170  1*1. M 
rTH*ETH*cm»»rTTin 
TSC*-2»AIf A6«rTH| 

IP  I IPPP  .1  D,  J » SO  TO  S*6B  . 

I0UT«I»EP-1 
00  267  ISi’cl.tOUT 
RCAUI6oOOHPC.SiGP.AA.TS.pT.EP 
URITCI6HPC.SI6P.AA.TS.CT.CP 
RCWI»0  * 

WHITE  I (.000  I IPrP.SI6.A.TSC«CTH.cllN| 

WRIT!  IS)  I PEP.  SIR.  A .TSC.ETH.CIIP  I 
WRIT*  |6.S00)TPT-P.S1G.A,TSC.CIH.CI|N) 

REWIND  5 

00  >69  lOSal.TPCP 
PCAOI5llFC.STRKiAA.TS.FT.FP 
WHITE  16 ,000) IFF .SIBP.AA.TS.CT.CP 
R£«l*0  9 
RCwl*»o  6 

FORMAT (lX.116.1X.lC10.6.1X.lFlU.6f IX.lCt 0.6.1 K.6C1 4.6 1 


12 

170 


267 

2*6 

26« 

>06 


P*6c  1 


TUSeeS.STSAC 


0 

0 

L 

0 


0 

0 

0 

D 

D 


j r This  program  comphtis  new  soi  for  a Given  j matrix  ard/cb 

2 r SKT5  UP  NTV  INCIDENCE  ASPECT  ANCLE. . . 

S r 

4 fNCLUOr  ►*  A)'!  R , F YS At  iGFTR.StSAC 

5 fHiCUlOF  sot 

A TijTLGll'  1JI11M 

T ciPtMC’Ori  Xlr').''XIM>.r!3>,rV!?>.il5).ZZ!M> 

8 rulPLl*  ZMiftri 

9 immensum  *t.  < yi.or  * 

10  tutiivAi.r.i'Cf  (7"U  ).xkii  l* 

11  FoMPlE*  CjHP11*Pli*P21»P2V 

12  FpMPLE*  tCt.ZOTAIb.S) 

13  OATA  Ht,TW,LTA/3.1415<)t6.26Sl8,3T6.?2?/ 

14  haTA  C. ll/lb. 0,-.!>30!UDE-?)/ 

lb  Call  ESCH979) 

16  Whirr*'. 7) 

17  7 FoPWArnx.'HAie  MSTATIC  AnC.  1RCR  1 ISTART  e*) 

16  RF  A0!8.->MAFHT4.1,oh2,ISTART 

19  PAUSE 

20  CaIL  rrRh  <f*i 

21  TAIL  ASSli,fl(4H7ZAT.6MSTSVCt.R> 

22  FALL  A'<Sl(,fM4H7lA'°.6MS7SvCI.R> 

23  FALL  A'-.RlC  M4H70t'T,hHS7Swi.l  .*» 

24  FAIL  A^Slr.M4HOATA, fcHRYSVCI.il 

2b  |I»<**11'* 

26  wHlTfl»’.6) 

27  A FORMAT  f 1 X « *010  OATA'I 

28  Pi  AO  * UNiiO.'lS.nPn.tF.TM.PMl.TT.lcR 

29  WR1TC<'<,,!»n(io.*'S.0EN 

30  WHl Ti 1 n . 3 1CF 

31  WMrTClA.tflwnM.PHJ 

32  VRlTEln.l4lIT.*CR 

33  1«  FORMAT(lX,'TlHre'.ll6.8X,»rtAV  OIMc'.lIS) 

34  firWINU  1 

35  WHITE!  ..lb) 

36  If,  FORMAT  1 IX.  'fCW  ASPECT  0NLT7  A*TpS  1*N0») 

37  PeADl.T. -INASP 

38  WHITE  I •’.2501 

39  25n  FORMAT  l //,  «‘  fAF>  MOO.NOS.ntN.MCTH  «•> 

40  RtAOlB.-)nOi'.HF.OEN.METH 

41  WR 1 TE1  *»,2 1 14011.  MS.  9PM 

42  VHlTF  !««-))•'  IM 

43  TFIMLTM.NC.nr.o  TO  4 

44  WHUHr.3) 

45  5 FORMAT!*  REF  0 OMEGA  **) 

46  RtAOIfl.-KiM 

47  WHlTEin.-lOf 

48  2 F0RMAT!lXt.«Eirs.,lI4,2X,.»SrP«.,lI2.2X,.CLr  OENS ITT* • , 1F.9.3) 

49  4 UhITEIi  ,91 

50  9 FORMAT! ’HEAO  2 THRESHOLO  s») 

51  PtAOH».-)CF 

52  whITE(6,3|CF 

53  3 FORMAT ! IX Cs *• IE  9.3) 

54  14  A'oSfNS 

55  WRITE!  fl. 20) 


301 


_•- 


TCMM«aV|AC 


9*  on  format <•  m ao  tm«  mmi 

97  McAIMO'-llHaFMT 

9*  WRlTUb.HF4ITN.MMt 

97  004  FORMAT ( *Tm,  MMI  ■'•2tA.ll 

(0  fall  t'cint'ooi 

91  TFINASi'.U-.OIfin  TO  ft 

92  TALL  OFAi'SN 

99  MOSftaN'iS-1 

99  NaMOpANOSM 

99  TCK«0 

99  00  92  1 ■ 1,  N 

97  IM>0 

99  rg  99  Jal.M 

99  J-i ) 

70  jwbj«u*1 

71 

72  no  99  IM«u.J 

79  jpbjpfih 

79  KjaKlFtM 

75  At  KHt JP)=CtTIK  1 1 

79  J>OM*CA"S  I ?M  I ) )*CF 

77  no  9 ti  Jal  «M 

79  IFICAH'UHJM.LT. 200)90  TO  90 

79  In<1A«1 

90  tFUM.AT.lCnXCKai'j 

91  lF(lCK.6T,ir'M)A0  TO  00 

92  TJIlNIaJ 

99  On  MjaNJ*' 

99  IFl  ICA.r.T  . H"»r.O  TO  9» 

95  WRlTC(9tlAi«(IJ(jn)  • JKa|  • TNI 

99  02  MjaNIAl 

97  rtosc  9 

99  98  URlHni’OOtNStOKV'CF'TH.FHl.tTtlCIUCBS 

99  IF  ( ICK.GT  . H'M.ANI).* CTH.CQ.2)ftO  TO  IS 

90  no  TO  A94I 

91  18  UfiITCI«.ai?IICR 

92  Ala  FORMAT C *1  AX  rt|9  tXCCtOCO  ICKa'.llA) 

99  GO  TO  10(0 
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APPENDIX  G 

SPLIT-GATE  AND  LEADING  EDGE  TRACKER  PERFORMANCE  ON  SHORT  PULSE  ECHOES 


A. 


INTRODUCTION 


This  report  considers  the  tracking  behavior  of  split-gate  and 
leading  edge  range  trackers  against  short  pulse  target  returns  with 
several  peaks.  The  objective  is  to  learn  where  these  trackers  tend  to 
track  on  such  waveforms. 


Section  II  of  this  report  discusses  the  characteristics  of 
split-gate  and  leading  edge  trackers,  and  explains  the  effects  of  lockup. 
Section  III  of  the  report  describes  a computer  simulation  used  to  observe 
tracker  behavior  in  typical  missile  attack  situations.  Section  IV  shows 
some  typical  curves  of  tracking  performance. 


B. 


DISCUSSION  OF  TRACKER  PERFORMANCE 


The  performance  of  a range  tracker  with  an  extended  target  echo 
depends  on  several  factors,  the  two  most  important  being  the  shape  of  the 
waveform  and  the  design  of  the  tracker.  In  this  report,  we  consider  two 
types  of  range  trackers,  a split-gate  tracker  and  a leading  edge  tracker. 


A split-gate  tracker  multiplies  the  received  echo  pulse  by  a pair 
of  gates.  The  video  waveform  during  each  gate  is  integrated  and  the  two 
integrator  outputs  are  subtracted.  The  resulting  difference  voltage  is 
proportional  to  the  gate  offset  from  the  center  of  the  pulse.  This  dif- 
ference voltage  is  used  to  correct  the  gate  position  for  the  next  pulse. 


A leading  edge  tracker  first  differentiates  the  received  waveform 
and  then  tracks  the  result  with  a split  gate  tracker.  Only  the  positive 
side  of  the  differentiated  waveform  is  used  by  the  split  gate  tracker. 
Negative  values  of  the  derivative  are  excluded. 


In  the  absence  of  thermal  noise,  a split  gate  tracker  may  track 
at  any  point  in  the  echo  waveform  where  there  is  equal  area  under  each 
gate.  In  a waveform  with  multiple  peaks,  there  may  be  several  such  points, 
depending  on  the  gate  width  and  the  specific  waveform.  For  example,  if  the 
echo  waveform  is  as  shown  in  Figure  1,  and  the  gate  width  is  as  indicated, 


GATE 

Figure  G-l.  An  extended  target  echo. 
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there  will  be  at  least  three  points  where  the  gate  can  track,  points  A,B  and  C. 
Which  point  is  actually  tracked  in  a given  situation  depends  on  the  method 
used  to  lock  up  the  tracker,  as  discussed  below. 

Similarly,  a leading  edge  tracker  will  track  at  any  point  where  the 
differentiated  video  waveform  has  equal  area  under  each  gate.  Figure  G-2 
shows  a possible  video  waveform  v(t)  and  its  derivative  v'(t).  (The  regions 
where  v'(t)  is  negative  are  not  included  in  the  differentiated  version). 
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SPLIT- GATE 

Figure  G-2.  A differential  target  echo. 

When  v'(t)  is  tracked  by  a split  gate  tracker,  the  waveform  in  Figure  G-2  will 

have  three  points  where  the  tracker  can  track,  A',  B'  and  C'.  Again,  the 

actual  point  chosen  by  the  tracker  depends  on  how  the  tracker  locks  up. 

The  most  conmon  method  for  locking  up  a split  gate  tracker  uses  two 
different  gates,  a wide  gate  and  a narrow  gate.  The  wide  gate  is  much  wider 
than  the  target  echo  width  and  is  used  for  locking  up  the  tracker.  The  nar- 
row gate  is  matched  to  the  target  echo  width  and  is  used  for  tracking.  In 
the  search  mode,  the  range  is  tracked  with  the  wide  gate  until  successive 

samples  of  the  error  voltage  indicate  that  the  wide  gate  is  centered  on  the 

echo  pulse.  When  this  happens,  the  tracker  switches  to  the  narrow  gate, 
which  tracks  with  greater  accuracy  because  it  admits  less  noise  than  the 
wide  gate. 

With  this  method  of  lockup,  the  wide  gate  tends  to  align  itself  with 
the  point  which  divides  the  area  under  the  entire  echo  pulse  in  half.  When 
the  tracker  switches  to  the  narrow  gate,  the  tracker  then  moves  to  the  local 
peak  in  the  waveform  nearest  this  point.  In  an  echo  waveform  with  several 
peaks,  the  particular  peak  chosen  by  the  tracker  depends  on  the  relative 
strengths  and  locations  of  the  peaks. 

A second  method  of  locking  up  a split  gate  tracker  is  to  slew  the 
gate  position  across  the  range  interval  where  the  target  is  located.  The 
two  gate  outputs  are  summed  and  compared  with  a threshold.  When  the  gate 
enters  the  echo  pulse,  the  sum  output  will  rise  and  cross. the  threshold. 
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At  this  point,  the  loop  is  changed  to  a tracking  mode,  and  the  difference 
output  is  used  to  time  the  gate. 


With  this  method  of  lockup,  the  tracker  locks  on  the  first  part  of 
the  waveform  it  encounters  where  the  early  and  late  gates  have  equal  output. 
Normally,  one  slews  from  short  range  out  towards  longer  range.  In  this  case, 
the  tracker  locks  on  the  earliest  part  of  the  waveform  where  the  gate  out- 
puts are  equal,  i.e.,  on  the  first  pulse  of  the  extended  echo. 

Thermal  noise  in  the  tracking  loop  complicates  the  situation  because 
it  produces  tracking  jitter.  If  the  tracker  is  tracking  a low  amplitude  peak, 
the  tracking  jitter  may  be  large  enough  to  make  the  loop  drop  out  of  lock. 

If  this  happens,  the  loop  will  then  try  to  relock.  Where  it  winds  up  depends 
on  the  lockup  procedure  used.  A wide  gate  technique  will  return  the  tracker 
to  the  point  which  divides  the  area  of  the  total  echo  waveform  in  half.  A 
slewing  technique  moves  the  gate  to  the  next  peak  of  the  waveform  in  the 
direction  slewed. 

Typically,  the  short  pulse  return  from  an  aircraft  contains  several 
peaks  with  different  amplitudes.  The  shape  of  the  waveform  is  highly  depend- 
ent on  viewing  angle.  The  number  of  peaks,  their  locations,  widths  and  ampli- 
tudes all  change  with  viewing  angle.  During  a missile  attack  against  an  air- 
craft, the  echo  waveform  seen  by  the  missile  radar  changes  continuously. 

It  is  obvious  that  the  part  of  the  echo  tracked  by  the  split  gate  or 
leading  edge  tracker  depends  on  the  shape  of  the  waveform.  With  wide  gate- 
narrow  gate  lockup  technique,  some  waveforms  will  cause  the  tracker  to  track 
the  earliest  peak  and  other  waveforms  will  cause  it  to  track  a later  peak. 
Since  the  shape  of  the  echo  from  an  aircraft  target  changes  rapidly  with 
aspect  angle,  and  since  thermal  noise  also  causes  the  loop  to  unlock  at 
random  times  and  then  relock,  it  is  impossible  to  generalize  about  where  a 
tracker  will  track. 

For  a missile  attacking  an  aircraft,  the  evolution  of  the  echo  wave- 
form with  time  during  the  track  is  difficult  to  predict  unless  all  parameters 
of  the  attack  situation  are  taken  into  account.  For  example,  the  performance 
of  the  range  tracker  depends  on  the  angle  tracker,  because  the  angle  tracker 
affects  the  trajectory  of  the  missile  and  hence  the  target  look  angle. 

Range  tracker  performance  is  also  dependent  on  aircraft  and  missile  dynamics 
(acceleration  rates,  turning  rates,  etc.),  since  these  also  affect  the 
trajectories  and  hence  the  look  angle.  Of  course,  the  signal-to-noise  ratio 
is  dependent  on  target  range,  so  tracking  loop  jitter  changes  as  the  missile 
closes  on  the  aircraft. 

For  these  reasons,  the  most  realistic  way  to  determine  how  a tracker 
behaves  is  to  simulate  a missile  attack  with  the  important  dynamic  variables 
included  and  observe  the  tracker  performance.  Such  a simulation  was  developed 
and  is  described  in  the  next  section. 

C.  THE  SIMULATION 

A Fortran  program  has  been  written  to  simulate  the  important  aspects 
of  the  missile  attack  situation.  The  missile  is  fired  from  the  ground  at  the 
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aircraft;  the  aircraft  trajectory  is  controlled  by  the  computer  operator. 
Realistic  velocities,  turning  rates,  etc.,  are  programmed  for  both  the 
aircraft  and  missile  (see  details  below).  The  missile  has  a monopulse 
angle  tracker,  and  homes  on  a predicted  intercept  point  continuously  up- 
dated during  the  attack.  The  echo  waveform  of  the  aircraft  is  simulated 
as  the  sum  of  three  gaussian  pulses  whose  relative  strengths  and  time 
delays  depend  on  the  aircraft  viewing  angle.  The  aircraft  can  drop  a 
chaff  scatterer  on  command,  modeled  as  a single  scatterer  contributing 
an  additional  gaussian  pulse  to  the  target  echo.  The  chaff  scatterer 
decelerates  instantly  to  zero  velocity  when  dropped  from  the  aircraft. 
The  Fortran  program  used  for  this  simulation  is  given  below. 

Some  of  the  detailed  characteristics  are  described  below. 

The  simulation  details  can  be  broken  down  into  six  areas  — air- 
plane maneuvering,  missile  maneuvering,  range  tracker  characteristics, 
angle  tracker  characteristics,  radar  properties  of  the  aircraft,  and 
intercept  point  prediction.  We  briefly  describe  the  assumptions  below. 

Airplane  Maneuvering 


The  airplane  is  maneuvered  by  the  computer  operator.  The  program 
allows  a maximum  turning  rate  of  4.5°/second  in  steps  of  0.6°  per  second. 
There  is  no  interrelation  in  e and  <p  maneuvering.  The  velocity  of  the 
plane  can  be  set  from  100  meters/second  to  410  meters/second  in  steps  of 
10  meters/second  with  no  acceleration  restrictions.  These  figures  give 
a turning  radius  of  about  0.5  km  at  full  speed. 

Missile  Maneuvering 

The  missile  speed  is  controlled  automatically.  The  velocity  is 
50  meters/second  at  launch  and  the  missile  accelerates  at  0.1  meter/second/ 
second.  These  numbers  result  In  a typical  Impact  velocity  of  about 
60  meters/second,  since  most  encounters  take  approximately  100  seconds. 

The  missile  has  a maximum  turning  rate  of  11.5°/second,  controlled  by  the 
angle  tracker  described  below. 

Range  Tracker  Characteristics 
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Two  types  of  range  trackers  are  used,  a split-gate  and  a leading 
edge  tracker.  The  leading  edge  tracker  operates  by  differentiating  the 
received  video  waveform,  excluding  negative  values  of  the  derivative,  and 
tracking  the  resultant  waveform  with  a split-gate  tracker,  as  discussed 
earlier. 

The  range  tracker  uses  two  gate  widths  to  lock  up.  A wide  gate  is 
used  for  initial  acquisition  and  a narrow  gate  for  tracking.  The  narrow 
gate  width  is  10  meters  and  the  wide  gate  width  is  100  meters. 

Angle  Tracker  Characteristics 


The  angle  tracker  is  a conventional  4-channel  monopulse  tracker 
that  derives  pointing  error  information  in  both  angular  coordinates.  The 
sum  beamwidth  is  20°. 
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Radar  Properties  of  the  Target 


The  target  echo  waveform  is  modelled  as  a sum  of  three  gaussian 
shaped  pulses  along  the  aircraft  separated  10  meters  apart.  Short  pulse 
radar  returns  from  scale  models  under  controlled  conditions  appear  to 
have  such  a structure.  From  front  to  back,  the  throe  pulses  have 
relative  strengths  of  5,  3 and  4 units  of  voltage. 


Intercept  Point  Prediction 


A predicted  path  is  computed  for  the  target.  During  the  track,  if 
the  target  is  found  to  ueviate  from  the  predicted  path  by  more  than  5 meters 
in  range  and  1°  in  angle,  the  predictor  readjusts  the  path  calculation.  This 
window  area  is  to  allow  for  noise  and  overshoot  in  the  gates.  The  prediction 
is  based  on  the  assumption  of  a straight  line  path. 
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TYPICAL  RESULTS 


Figures  G-3  through  G-16  show  typical  plots  of  range  tracking  error  for 
a missile  attacking  an  aircraft  in  straight  level  flight.  The  curves  show 
the  range  tracking  error  as  a function  of  the  target  range,  with  the  smallest 
range  at  the  left  side  of  the  curve.  Thus,  time  runs  from  right  to  left  on 
the  curve,  since  the  missile  starts  at  large  range  and  then  closes  to  zero 
range.  Ten  second  increments  are  marked  with  x's  on  the  graphs. 


Figure  G-3  shows  a typical,  curve  of  tracking  error  for  a leading  edge 
tracker.  At  large  range,  the  range  tracker  is  using  the  wide  gate.  At  the 
point  marked  "0"  on  the  curve,  the  tracker  converts  to  the  narrow  gate.  It 
is  seen  that  the  sinusoidal  wandering  stops  at  this  point,  and  the  tracker 
performance  improves. 


It  is  seen  that  after  the  tracker  switches  to  the  narrow  gate,  the 
tracking  error  persists  at  about  +12  meters.  On  these  curves,  range  is 
measured  from  the  center  pulse  in  the  (three  pulse)  echo  waveform,  so  this 
residual  range  error  means  that  the  tracker  is  tracking  the  leading  pulse  in 
the  echo  waveform. 


Figures  G4-7  show  several  additional  runs,  all  with  the  same  leading 
edge  tracker.  Figures  G-3  through  G-7  are  all  run  under  the  same  conditions, 
except  for  aircraft  velocity.  In  Figure  G-3,  the  aircraft  velocity  is  140 
meters/second,  in  Figure  G-4  it  is  180  m/s,  in  Figure  G-5  it  is  220  m/s,  in 
Figure  G-6  it  is  260  m/s  and  In  Figure  G-7  it  is  300  m/s.  We  note  that  at 
180  m/s  (Figure  F-4),  the  steady-state  error  is  approximately  -7  meters;  in 
this  case,,  the  tracker  is  tracking  the  rear  pulse.  At  220  m/s  (Figure  G-5), 
the  tracker  tracks  the  center  pulse.  (The  residual  error  is  approximately 
+2  meters  — it  is  not  zero  because  the  leading  edge  tracker  tracks  the  front 
edge  of  the  center  pulse).  In  Figure  G-5,  the  tracker  switches  to  the  narrow 
tracking  gate  at  a range  of  4.85  km,  but  then  goes  back  to  the  wide  gate  at 
4.5  km,  and  finally  returns  to  the  narrow  gate  at  3.2  km.  This  case  il- 
lustrates how  the  tracker  returns  to  the  wide  gate  if  the  narrow  gate  drops 
out  of  lock  due  to  range  jitter.  Figures  G-6  and  G-7  (aircraft  velocities 
of  260  m/s  and  300  m/s),  the  range  tracker  again  tracks  the  leading  pulse. 
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" Figures  G-8  through  G-15  show  a similar  set  of  runs  using  a split 
gate  tracker  instead  of  a leading  edge  tracker.  All  curves  are  run 
under  the  same  conditions,  except  for  different  aircraft  velocities. 

The  velocity  spans  the  range  100  meters/second  to  410  meters/second, 
as  labelled  on  the  individual  curves.  In  this  set  of  runs,  it  is 
seen  that  the  split-gate  tracker  tracked  any  of  the  three  pulses, 
depending  on  the  aircraft  velocity. 


Observe  the  expanded  scale  used  In  the  split  gate  tracker 
results.  The  reason  is  that  the  split  gate  tracker  tended  to  lock 
on  to  the  first  pulse  it  observed  with  little  overshoot.  It  shifted 
to  the  narrower  gate  almost  immediately.  Tracking  jitter  is  also 
higher  for  the  split  gate  tracker.  This  is  most  likely  caused  by 
the  larger  width  of  the  pulse  being  tracked.  Compare  pulses  A and  A' 
Figures  G-l  and  G-2.  These  pulse  widths  tend  to  correlate  with 
the  jitter  magnitudes  observed,  approximately  1-1/2  meters  peak  to 
peak  for  the  leading  edge  tracker  and  four  meters  peak  to  peak  for 
the  split  gate  tracker.  Another  factor  may  be  the  additional 
separation  or  isolation  of  the  pulses  being  tracked  for  the  leading 
edge  tracker.  This  would  also  tend  to  reduce  the  jitter  for  the 
leading  edge  tracker. 


E.  CONCLUSIONS 


In  general,  a split-gate  tracker  may  track  on  any  peak  in  a wave- 
form where  there  is  equal  area  under  each  gate.  In  a waveform  with 
several  peaks,  the  particular  peak  chosen  depends  on  the  lockup  method 
used  and  the  evolution  of  the  waveform  shape  during  the  lockup  pro- 
cedure. Moreover,  the  lockup  has  a statistical  behavior  because  of 
the  thermal  noise  in  the  loops.  Thus,  with  a given  echo  waveform, 
the  tracker  may  sometimes  lock  on  one  peak  and  sometimes  on  another 
peak. 


A leading  edge  tracker  operates  by  first  differentiating  the 
received  video  waveform  and  then  tracking  that  waveform  with  a split- 
gate  tracker.  Hence  the  same  comments  apply  to  a leading  edge  tracker. 


Usually,  if  a particular  peak  in  an  echo  waveform  (or  its  deriv- 
ative) is  predominant,  the  split-gate  tracker  will  settle  on  that  peak. 
However,  during  a typical  missle  attack  trajectory,  the  strongest  peak 
in  an  aircraft  echo  will  sometimes  be  from  the  front  of  the  aircraft 
and  sometimes  from  the  rear.  Hence  it  is  not  possible  to  draw  any 
general  conclusions  about  which  part  of  an  aircraft  is  tracked.  More- 
over, the  tracker  does  not  always  track  the  strongest  peak.  The 
examples  shown  in  Figures  G-4  and  G-5  are  cases  where  the  tracker  ' 
tracks  the  intermediate  peak  and  the  weakest  peak. 


In  this  study,  we  assumed  the  short  pulse  response  for  an  air- 
craft in  the  form  of  three  Gaussian  pulses  of  different  magnitudes. 
The  simulation  of  the  reflections  from  the  scattering  centers  as  a 
Gaussian  pulse  is  probably  reasonable  in  that  the  precise  shape  of 
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the  individual  pulses  would  not  materially  alter  the  results.  The 
important  feature  is  the  pulse  position  and  duration,  their  relative 
maximum  values,  the  number  and  spacing  of  the  received  pulses.  Of 
particular  importance  is  the  manner  in  which  these  pulse  properties 
change  as  the  relative  orientation  of  the  radar  and  the  aircraft 
changes  in  flight.  These  parameters  were  not  available  to  us  at  the 
time  of  this  study.  Any  future  effort  of  this  type  should  be 
prefaced  by  a study  that  would  generate  this  specific  data. 

It  is  observed  that  since  the  precise  pulse  shape  is  not 
critical,  it  may  be  practical  to  generate  these  pulse  returns  in  a 
relatively  simple  way.  It  is  generally  conceded  that  present  GTD 
capabilities  are  such  that  the  scattered  fields  can  be  predicted  with 
reasonable  accuracy  and  costs  for  all  parts  of  the  aircraft  except 
the  jet  intake  and  jet  exhausts.  It  should  be  practical  to  obtain 
the  appropriate  pulse  properties  experimentally  from  these  critical 
scatterers  using  a short  pulse  radar.  Used  in  conjunction  with  a 
directional  antenna  to  isolate  the  intake  response  from  other  scat- 
terers as  the  radar  is  moved  around  an  actual  aircraft,  this  type  of 
measurement  would  provide  the  additional  data  required  to  evaluate  the 
performance  of  the  range  trackers. 


RANGE  ERROR  MEASURED  FROM  CENTER  PULSE  POSITION 
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Figure  G-5.  v = 220  m/s.  Leading  edge  tracker 
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♦ EVERT  10  SECONDS 


Figure  G-8.  v = 100  m/s.  Spit-gate  tracker 


RANGE  ERROR  MEASURED  FROM  CENTER  PULSE 


RANGE  ERROR  MEASURED  FROM  CENTER  PULSE  POSITION  (M) 
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RANGE  ERROR  MEASURED  FROM  CENTER  PULSE  POSITION  (M) 
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340  m/s.  Sfllt-gate  tracker 


Figure  G-13.  v 
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TrgCLUOF  UELAY ,LIbl 
TnCLULA-  HPPSVB.Lltfl 
TwCtuO-  ffjSSB.P-tttn 
luGICAL  LuUT.irH/FF.LANS 
PlNEUSiPt*  CFA<3>*V(3> 

Pl^ENSTOU  l'LA*'c  < 5 ) ,R0CKET<5>,CHAFF<3.10n»,IPiiFF(MG> 
rif’EHSlOW  SPLJTAC3)  ,fA'1P(3J  *r»Rl3) 

FxTERi'l y'L  CRFTlT 

ro^rt-Jig  SUE. PLANE  .POCKF  T .C.H/FF  .IgCHAFF  * LPliT  . PMiGt  . ThEi 


10 

roM«OM  RANGES .tmET/S.PMIS.SNP.lARLY 

11 

rQNMON  INCUT 

12 

OaTA 

S6|.AI>if.  .WPI.7ME/.01 ,40  00./ 

13 

HaTA 

irnAFF.LCMAFF/.Ci4.15o./ 

14 

data 

K-  IN/.l  / 

15 

fata 

U-1/.15/ 

lb 

TATA 

SPLIT  A/-.nt»-.G0l5»-.lll/ 

17 

I'ttTA 

Ti'RI,S»TUI»*'Sl/.01,.01/ 

1C 

P/TA 

S t (Jbi-jO/lOO  »/ 

19 

pata 

H"01$E/1,/ 

20 

PaTA 

UicALT/  .05/ 

21 

t«T  A 

u.\AX/.t/ 

22 

PATA 

HASEV/,01/ 

23 

tata 

DV/.Aol / 

24 

data 

R'»C*W/.t)5/ 

PATA 

R'C*V2/.05/ 

26 

PATA 

X CHAFF /.FALSE./ 

27 

PATA 

l>'</. 3b.  .003*7,/ 

20 

P/.TA 

T»*E  r AN/,  01  / 

29 

PATA 

F,l*lN/.Ol/ 

30 

PATA 

RANGEfVl./ 

31 

r ata 

TSPUT/.OnB/ 

32 

data 

PSPLIT/.040/ 

33 

r aTA 

K/Mbfil/l./ 

34 

r'ATA 

07, '1H/-. 01, -.0015, -.01/ 

3b 

PuTA 

C*  AP1N/.0  3/ 

3v» 

■ pata 

TI'Anp,PoamP/.O07.  .007/ 

37 

pata 

W E«/.2/ 

36 

pata 

vf'PCf  i/.nnoi/ 

3V 

PaTA 

S'-'MUIJt/.S/ 

40 

eat  a 

PLANE/,/. 001/ 

41 

PaTA 

»'>'Ew/,01/ 

4?  r 

npTT 

IS  The  TIfE  INTERVAL  « ASSUMED  ■ 

43 

call 

Cr  TON 

4 4 

CALL 

C:,THTS<IPUFF»510.4) 

4b  5 

PpTTs 

: 1 • 

46 

RANGE 

;=o. 

47 

4ANGtS=0. 

40 

THETA 

= !). 

49 

TmL TAb=0. 

50 

phI=0 

• 

51 

r nis= 

0. 

52 

tpm=o 

• 

53 

7hP  = 0 

• 

54 

*1NTEK=0. 

55 

YjNTEft=0. 

TO  BE  ONE  SECOND 
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5*>  CALL  FF«K<2) 

*7  * CHAFFeo ' ‘ 

5H  TkM>=‘. 

59  TflNG=l 

60  i.llMTs. FALSE. 

61  PLANE (A) =5. 

62  PLANE«'i)=f). 

63  4-lAMF  (1  )=C. 

64  POCKE  1(1)=!'. 

65  KOCKf.T(?)=i>. 

pucke  r ( ;■>»  =o.  " 

6/  R0CKET(4  Js-160. 

6«  ROCKET  <fi)  =<42. 

6 9 PANGFS=-1. 

70  ROCKET (4 )=HOLKfT( 4) *3.1415926/100. 

71  RoCKET(!i)rhOCt<rT<?)*3.im3E-2A/lfiO. 

7a  PLANt(4)=ptAMf (4)*3.1415926/1SU. 

73  plane (r>=Pi  anf* 5)*3. 1415926/100. 

74  TuRNSl~AbS(  niRNSl ) 

76  ■ WHITE  ( ('•  . 9 ) 

76  9 C0PMA,T<*0SE  CANNED  OATA?  ( I/F I • ) 

77  REAO<6.-)LAiMS 

70  TF  (LANS)  GO  To  101 

79  TALL  ESC(112) 

fl<  WKlTE<r,H) 

61  10  FORMAT < 'tNTl.R  OPTION  VALUES*/'  1=R**?  ZssPLlT  GATE  3sDELAT  L)NE*« 
*•  4=THKtSHOt  T •/*  l=COS*»2  •/ 

03  ♦•TsDU'P  TO  TA°E  FsNO  DUMP*) 

O'*  12  RtAlMe.-JlhNGtlAN&.LOUT 

06  15  WhJTF<A,20> 

06  ?o  PuRMnT « *t wTFR  "LANE  E LL VATIOh* HEADING • DTVE  ANGLE  * ) 

07  HeA0(0«-)PLANf(3>  » PLANE  (4)  .P)  AN£(5> 

SO  PL  A NT  ( «•  )CPLANF  (4  )*3, 14J  5926/100. 

SV  • PLANE(5)  = 3.14iri92fe*PLANE(6)/te0. 

90  PlANE(1)=0, 

91  PlANE(2>=0, 

92  WRlTEO'.SO) 

03  30  FORMAT  < 'INTER  MISSILE  POSITION  (XVT.Z) .MFAOING.DIVE  ANGLE  * ) 

04  HFA0(0.-)K0CKFT 

96  HoCKEr'4)sR0CKrT(4)*3.14i592A/lC0. 

96  RoCKET < 5) sRUCKFTt 5 >*3,141 5926/100. 

97  CALL  CALAMG(-RPCKET(X),-R0CKFT(2)tPl.AwE(.4)-RTCKET(3) 

90  * , RANGE . TmE  T A «r*HI ) 

99  RA.'IttESsPANGE  

100  CALL  O'.THUT 

101  WRlTE(6,40) 

102  40  FORMAT ( 'UK?  (T/F>' ’ 

103  HEAO(fl*-)LANS 

IP4  IF  ( .NOT.LA('S)GO  TO  15 

106  WRITE  ( •! » 60 ) ~ 

10b  90  FORMAT  ( *t  fiTFR  TRACKING  INFO.  (NiTHETA  •PHT  »0R  ) *> 

107  RE  AO ( 0. -) MANGF S « THETAS. P4I5. RANGE  V 

106'  JCl  TMFlAS::ThETAS*3. 1415926/100,  * 

109  Phi'  16*3,1415926/100. 

110  TS=0 


111 

112 

113  55 

114 
lib 
lib 
117 
11C 
lib 
120 

121  so 

122 
1?3 
12** 

12b 

12b 

127 

12a 

12V 

131) 

131 

132 

135 
131  r 
13b  ion 
13b  r 
137 

136 
13? 

110 

111  110 
142 
1C.3 
111 
14b 

146 

147 

146  120 

l'*V 

150 

1M 

152 

133 

154 

155 

Ibb  12*t 

157 

150 

159 

160 
161 
162 
165 

164 

165 


no  35  1=1,3 

call  p;-f>sw(5-i,J» 

ts=is*^+i:-j 

PLANE1/=»ASEV+m'*JS 

TFtKAI\K'rS.6T.0>«H  TO  60 

TALL  C 'LAubC -RACKET  <1> .-R0CKFTI2) ,Pl  A^E  ( 3 > -P OCKET  ( 3 ) , 

* RAfy6t"S«THf  TAP, HIS) 

CAftlbF.VrPLAHf.V*<-0?<rLAMr  CII-THEI AS)*CCSCP|  AMf  t ?3  > -f  nIS>- 

• KOCl- V*COS«rnCbf  TI4)-HiLlA«:)*rOS«RCCKt  Tl5)-PHlr.» 

I'A^SESsR  AHGES-P  At 'Of  V 

ThE  TaP=TH( T AR 

Pf,IP  = PhlS 

r,(.HAFF  = 0 

TmIS5=<' 

ThUALsO, 

PhTLs'l. 

ThFTAV=0. 

PhIV=0. 

yp=o. 

Yy  = C . 

A().IUST  = 0» 

T .»:°DK  = * 

CALL  ESCHlOOO) 

''bin  L'*OP , TPACK1NG  SEGMENT 
I’D  250  11  = 1,250 

PRIME  AK-LE  WALUES 

tall  C aLAivG  (-ROCKET  1 1)  ,-RL>C.KFTCi>),PLA'iElS»-H-,rKE7  (3» 

* , RAfJC'f  , 1 META , PHI  ) 

PI  S2=H  AMbt*  RANGE 

GO  TO  (11  0,12.0, 130, 140  HlRNG 

''10fJU  = S16C-^n/M*AXl  (OISP.KMIN) 

MAi;,".L  = S1CUAL*  (1  .itOSOMn  A-PPCKFTC4)  > >**2M  1 .♦COSIPHI-fiOCKET  (51)  ) **2 

PAMGtS“RA,\iF‘ 

All01S£.=rt4til3F*PETU«l(l  .RAN&E-DKl.RANGt+PRl > 

GNP  = <STG,\iALFAN01SE  I/AUOISE 
PAH6ES  = RAf(GFS*PAA’F  (RANGNl  )/S*iR 
•Mi  TO  150 

PM'GES=RACGt  SlPAC  GEV 
T R M G 1 = 1 R N (i  / 2 

F ARLr  = »-’f.1uRt',(  IPIVIG1  »RAflGES-uP  ( Inorf.  > , P ANGfS  ) ♦ 

♦ KETi'Kl  ( IKfiOT,KAI>.'GCS-DR<  IMnPE)  .RANGES) 

AlATE  = REHJRW(  IRNGl , RANGES »RANGtS*CM I^OPF)  > + 

*■  RETUrtl  ( IRF-gi  «MNGiS,PAhGES*UR  ( IMOl'i)  1 

S lGNAL=PtTUKA'<1  «RAMGf  S-n«  ( IMnPE)  «RAMMS4r*K  ( IrOLlE  ) ) 

A ijO  I Sh.  = Hi'J01  SE  ♦°FTllRl  ( l , RAM.it  P“OR(JhO|,F.),HA,\ir,ts+OP  ClMOtir  ) ) 
10PI“!AT«2P1C».«) 

SNR  = |SrGI\iAl.*AHOlS‘)/ANOIf;E 
FflPLT=»0S(EiiP|  Y+HrWFCHANr,t.N)  /SI4R) 
al  ATE=ftnS(  AlaT'-fRANFCF.ANGEM/Si'IH) 

If (SIGI  AL.Lt ,0. ) GO  TO  150 
AOJUST=(iAPLY-M-ATf  I / ( E APLY+A L ATE ) 

IF  UX.r0.1»AJllFL=AnjUST 

PA'lbEV=PAMGl  W + RP1  ITA(  IPNoi  (*  AO  JUST+DAr'Hl  TRNG1  I * < ADJUST- At, jUSl  ) 

I*.  ( APS  ( AUGUST  ) fAPS  ( A,0  JI'ST-APJUSL  ) ,GT»SkMoDE  ) Of  Tf;  1 20 
TF CIMOCr.t«.?.nR.II,LT.5lGO  TO  ipe 


,WW  T SJ 


166 

167 

16fi 

169 

170 

171 

172 
174 
174 
17b 

176 

177 
170 
179 
lflU 
1<U 
162 
1A3 
If.  4 
16  b 
lCfa 
107 
15o 
169 
19U 

1 91 

192 

193 
1C4 
193 
19b 
197 
19b 

199 

200 
201 
202 
20  4 
204 
20b 
206 
207 
20ti 

209 

210 
211 
212 

213 

214 

215 

216 
217 
215 

219 

220 


127 

l?* 

130 
14  0' 
150 


156 


160 


162 

166 


168 


166 

167 

170 


180 


T NODE  = 0 
FkITE(h,127» 

F(jPMAT(»  TARGET  AGtHJIREO*  ) 

AUJUSL  = AL.JUST 

r-o  T (i  151 

STOP  RANGE 
GO  TO  120 

TmFTAS=T) FT AS+THF T A V 

PHlS=P"IV  + ATAA'(CO<;(THF.TAV>*TAAl(PMlS)  ) 

r-0  T0<15b. 160*170. 100). TAM6  

continue 

Th£TAS=TheTA+RANF  ( THETAN ) /SNp 

Fuliist*'  X + HAf  F (»MIN)/SNP 

WE1SmT-S1c.MAI.*vFACT 

TF  ( k.ElMiT  ,L’T  ,H«'AX  >WEIfi)  T=U^/>V 

Go  TO  ,'OU 

PH=U. 

PL  = (J. 

rn=n. 

Tl  = 0.  " 

TAU.  a.  GLF2(-P0CKET<1 > .-ROCKFTO)  ,PLA  E * * ) -ROCKET  ( 3 ) . 
•SPLANF  .Wl-LAMe,PM.PL.TH.TL) 
lF(;MCM.lF)-.tC.O)GO  TO  165 
no  162  I = l.f\>CM<\FF 

GAU.  AWGLL2( CHAFF  (1  .l)-RPCKETH),CHAFF(?,I)-ROCKET<2>, 
*CHAFH3.I>-POr«E  T»3>  .SCHAFF.WCHAFF.PH.Pi  .TH.TU 
CONTINUE 

TH  = AbS<TH4RAMF(TI<FTAN)/SNR) 

TL=633 (TL+RAKF1 THETAN )/SM6)  ' 

PH=AHS(PH+MAAFfFHIK|>/SNR) 

PL=ABS  (Pl.+R  Atop)  PHI  N> /SNR) 

MHETA=<  (h-TL)/«Th+TL> 

APHI  = (PH-PU/{PH*PL) 

IFUI.’JE.)  ) GO  TO  168 
TmF  TAL=AThETA 
PHlLsAPHl 

ATHET/,=AThETA*TSPIIT4(ATheTA-TheTAL)*TDanP 

AHHI=AHHI*PSHLTT4(FPHI-PhIL)*PUANP 

TmETaV  = ThE  TAV  + aTHET A/RANGtS 

PuIVsPMlV+APHt /RANGES 

IF<AHS«PHIS).UT. 1.5707969)60  TO  200 

ThET  AS  = TMf,T  A S+3. 1415526 

TF<PHIS)16b.l66.167 

PhISs-3. 141 5926-PhIS 

GO  TO  poo 

PHlSs3. 1415926-PHIS 

GO  TO  ?0u 

PH=0. 

PL  = 0. 

Th=0.  " " "■  “ “ 

Tl  = 0, 

CALL  AA'GLE2(-Rf.CKET(i).-R0CKFT(2),Pl.Al.tM)-R0rKETf3),SPLANE 
t.^PEAi  E.PH.PL.TH.TL) 

GO  TO  165 
STOP  AHGLE 
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221 

222 

224 
2?** 

225 

226 
227 
22 15 

229 

230 

231 

232 

233 
23*+ 
23t' 

236 

237 
23 1) 
27.9 
241! 
2 ul 
242 
24  3 

244 

245 
24b 
247 
2<»8 
249 
25u 

251 

252 

253 

254 

255 
25b 
257 
25<? 
209 
2 60 
iot 
292 
253 

c64 

265 

266 
2b  7 
266 

269 

270 

271 

272 

273 

274 

275 


200  rofTIU'lt 

220  0 y^rXB+bOCKri  »1  ) *P  AMGF.S»CoS  < TuF  US  > *CL  6 ( Pol  S 1 
v<;  = Yq+'-’0CKFT(.'>1+bf  Mil  S*SIM  ThE I AS ) *C0S  < PuIS ) 

T(-  ( 1 1-‘  >2201, 2202. 2203 

2201  xu=X2 
Y0  = Y2 

6U  TO  2220 

2202  Xi=X0 
Yi  = Y0 

VX=<X«—Xl)/i:0TT 
\/r=(  Y2-Yi)/noTT 
VU=S‘)KT(VX*VX4VY*VY) 

Tlf/TER“RAr  OtS/POCKV 
Tf>l»=T X i ST£-K 
T.-|P=TI  iTtH 
C-j  TO  2204 

2203  xp=Xi4VX*|jUTT 
Yh  = T14\'Y*uLiTT 

2209  U's.'NFW/OriAX)  CK  utlKF  S.  1 . ) 

X2  = « xo+w*x2  >/n  +w) 

Yy=(Yi-><X!*T2)X<1+*) 

VX=(X2-Xu)/l-0TT/2, 

VY=(  Y2-Y0)/(i0TT/2. 

VjsSjKU  VX»VX4VY*VY) 

2210  ”TMTE0  = ( TlNTf  ri  + Th’P  ) X2,-or<TT 

2204  X INTER"  ( X JMTt  0 4-VX*t  ICJYER  + X2  ) /? . 

YlNTFUs  ( TjNTf  R + VY*TU‘TrR4Y2)/2. 

fiHblsSbh  T«  <X<i4RnCKET  (D-XlMTR>**2'MYn*RC)rKEl  ( ? > - YI NTER ) **2  ) 
roS6=cosu<ucKrT(5) > 

IF»C0S5.  to.  0.)C0S5=1. 

TMPsiiP  "/(ROCKV+n  l*P»(M)TT  >*VPnCi\I*.5)/C0S4 
XU  = X1 
Yi,=ri 
X l = X2 
Y1  = Y2 

fl  LrtITE<-.2303)XP.rR,X2,Y2,xP.YP,VX,VY,XlWTER.YlNTEP.VPOCK« 
n * tkp.timter.thetop.phip.ptmeta.ppmi 

230  3 PoOvIAT(5<'('.FA.5.’»,Fft.5,»),).Fb.s/ 

■»*><  M • .F0.5.  • , • «F*>,s*  ) • ) ) 
r.  SINCE  -IF  KiVi.  HAVE  X.Y  INTERCEPT  THEN.  F I HD 

C RELATIVE  AN6LF  FKO'i  ROCKFT  TO  PLANE 

P tL i X=v INTER -POCKET (1 )-X2 
Pt».  IVsYINTf  R-RoCKf  T(2)-Y2 
Pfl.  1 2 = l>ANbt  S*STM(PH1S) 

taLL  CALAMbtREI  IX.PtLIY. PEL 1 7 * HHG .PTHE  T A . 

* P P H I ) 

Cl  IF  (RNIj.GT  . » 1 ) 00  TO  2212 

Cl  WRITE ( 6 .2304 ) TINTER.RN6*R0CKV.PLANE(3 J .ROCKfTd ) . 

Cl  *kOCkET(2) .ROCkEI (?) 

2304  FORMAT ( MhlFPCrPI  •7F10.5) 

2212  TF<  <S  Pi.Lf  .1.6)  .OP.  (TIMTER.LT.4)  ,CR.  dlAP.LT.  A)  ) (-0  To  2219 
2213  Tf(II-IU)  222p.22Ju.2231 

c Initially  set  to  calculated  values  " 

2230  ThF:TaP  = THeTAS 
PhIP=PhIS 
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276  r.o  TO  222c 

277  r TEST  Til  SEE  IF  GOImS  TOO  FAST  " 

276  TC^R  = .0*t'RIMEM'THETA-THtTAP) 

279  IF  ( AHS1  Tl.CM  .LT.  .?>  60  TO  2234 

260  IF(tCOR)  *2 32,2233,2233 

221  2?3P  TCOR  = -.2 

2«2  60  To  '-234 

2°3  223*  TfOR  = .2 

2f<*  2234  THF.TAP  = T^TAPFlCOK 

265  rHTP  = PHIR».S»PFl6'F(PPHl-PhIP> 

260  Cl  WRITE <6,2303)  yP*TP,VX.VY,VJ 

267  fi  WHITE  C 6,2307)  T INTf. K . XINTER * YINTe R « RNG . RTHET a . PPHI * TEETAP 

262  rl  »,PHIP 

269  2307  FORMAT  ( • T INTER , XINTER  . Y INTER . RNG , PTHFTA  ,pPHI . THET • 

290  *«AP,P>aP»/MEin.i) 

291  2?Ufc  CONTINUE 

292  60  TO  2216 

293  r Tu«N  ROCMT  TOWARDS  PREDICTED  TARGET  IF  COURSE  PREDIf  TED 

294  r TF  NF.AH  I AK6F.T  COMPUTE  CPA  AMD  ( HECK  IF  TIME  TO  EXPLODE 

29b  2219  V(l)=RoCh0*C0S<THETAP)*r0S(PwTP)-PLAr.'E  X 

29«j  V(?)=Rnf>V*SIMTHf.TAP)*Cnb{PHTP)-HLA|.  EY  - 

297  V < 3 > =K0CKV*CIN  { PH  I R ) *PL  ANE* 

296  01  WRITE <S»23*1)SnR. TINTE».TmP 

299  23? 1 F<jRM«T< 'CHECKING  CPA  '.3F1U,5> 

300  r CALCULATE  T IMF  TO  CPA 

3 ill  S1  = 0. 

302  Si<  = 0. 

3fi3  ro  2212  1 = 1.3 

304  Sl  = Sl*VUl*(ROPKET(I>-PLAKEi|Tf| 

30b  ?2ia  sa=s?+vm*vm 

30b  Ti.-’CPA  = -li1/S2 

30  7 rl  WRlTEIf  .2:-*23)V,Sl,S2.TIMrPA,PLAMEX.PLANEY.PLANE2 
30b  ,23?3  FORMAK  '1(.KI“S*l2Eir>.S' 

3 A 9 r ThECK  If  MlSSIlE  HAS  LOST  TRACK 

310  If(SNK.lV. 1.5)60  TO  2229 

311  r Check  if  CPA  coming  up 

312  IF  1 TIMCPA.GT .1 ,0 ) Go  TO  2213 

313  lF«TIMrp/,,LT.0. 1GOT02215 

314  r CftLCOEi'Tt  POSITION  OF  CPa 

3 15  ?214  F1=0 

3lb  CO  2217  1=1,3 

317  ePAm=RUCKETlT>-PlANE<I>+Vm*TlMCPA 

310  2217  Sl=Sl+CPA<I>*CPACJ) 

319  Si  = SURT (bi  ) 

320  C IS  CPA  CLOSE  ENOUGH  To  COUNT 

321  Cl  WHITE  16*2324 )Si 

322  2324  FyRMAT ( ' U; S 'F 10 ,b ) 

323  TlNTERrTlMEH-TIMCPA 

3:;4  White  (6.2  32(')C°A.TIMCPA.S1*TTNTEP.R0CKV 

325  2320  FonMATI • iNTt RCFPT- • 7K10.5 1 

32fc  CALL  LE TTcR<3.*7.5,3*4,1?H  INTERCEPT  ,10.10*12) 

327.  CALL  Lt-'TTf. R<2.«7.,l*4*6H  CPA  (. 10,10*0) 

326  CALL  N.imiEH(2. 7,7.,. 15.1000. *LVa(1)«0.«1  I 

329  CALL  NfNOERl 3.7,7. , . 15« 100U.*CPA ( 2 > ,0. ,J 1 

330  CALL  N’lMDt'f.  (4,7,7*,.15»1000.*CPA(3),C.»ll 


D 

0 


331  CALL  LFTIEM5.«.7.»1.4«3H  ) «I0.I0»3> 

rftLL  L‘.  TtfP  t?.  .{-.5*l»4*bH  H A vPl  . 1 0 » 1 P » 6 ) 
iM  TALL  NU'IHl  K < 3 . . b . 3 « . IS ♦ 1 0 Ol<*Sl  « 0 . « 1 > 

234  CALL  Cr'TPLT(G.,n.,'>99) 

335  f-0  TO  1000 

33b  f M£KE  IP  i>f IP-  Sl4*LL 

327  2229  IFU.SD  E«EO.?)nO  TO  2228 

3.30  IF<TIMCPA  .61.  4.)P0  TO  2215 

339  IF  ( Tir.rPA.LT  .1  . K’O  TO  2214 

340  ro  TO  ??lfc 

3«*  1 2215  TnTSS=TMlSS-l 

342  Cl  WKl TE  ( •■> 1 2322  ) T^ISS* TIMC°A 

343  2322  roPNATMUO  SOOn • 2F 10 . 5 > 

344  ■fl'-ICPAsO. 

34t.  IF  (T.v|IPS);'2l4,?21M,22lP 

34b  ?2?3  It-iODf  = • _ 

347  WkITE  < <••2227  ) 

340  ?227  F(jl»iiAT(  *SkITCHTM(-  TO  ACQUISITION  MOpE’) 

349  221b  POCKET (4 J=THETAP  _ _ 

35U  PuCKET<S>=P"IP 

351  C OUTPUT  K41I  TO  OPERATOR 

3?:2  C PUT  F 1 1 ’ S f INTERCEPT  MUST  BE  CONVERTER  To  PLANES  PEF 

3La  c faum  absolute  pt'F 

3T4  r SWITCH  TO  ACeiJTRk  MODE  IF  MISSILE  LOSSES  TRACK 
33o  2220  yif'TEK  = XIl  Tt  P-v2 
356  Y1MTER  = YJNUR-V2 

33/  CALL  OUTPUT 

35b  ytt'!TEK  = XlwTER4y2  _ _ 

359  YIMTER  = Y1MT1  P4-Y2 

3bU  IS=0 

361  PU  205  I=l»f> 

3b2  CALL  PnPSw  t 5-1 « J ) 

3b3  T<j  = IS*?4«:-J 

3b4  ?05  CONTINUE  __  _ 

3b5  PLANV1=8ASEV+0V*1S 

36b  IF < A8S<PLAMV1-PLANEV).GT.PLANEA)G0  TO  20sl 

3b  7 PLMEV-PLAMVl 

3ba  c-o  TO  P0S3 

369  2051  IF  ( Pl.A“'Vi  .LT  .PL  AfiEV  >60  TP  2052 

370  ra  nMEV  = PLAM  V4PLAPEA 

371  SO  TO  P0O3 

372  2052  PuftNEV-PLANEV-PLAMEA 

373  2053  CuSP=CnS ( PLANF (5) ) 

374  F’LANEX=PLAA4  V*rOS(PLAMP(4)  )*COSP 

375  PLANET  = PLAF-t  V*SIfH  PLANE  14)  )*rOSP 

37b  PLANE2=PLAArV*':If'l(PLAME(5)  ) 

377  PLANE  I 3 ) sPL AhE ( 3 ) + PLANI Z 

376  C SET  PLi'ME  TURNINGS 

3-9  c meadi'mi;  Chaise  in  6-9 

3H0  C RISE  A'lGLF.  CHANGE  IN  10-13 

3C1  TS=0 

3**  nu  205  1=1 t 4 

383  CALL  POPSHUU-ItO) 

3b4  ?P6  TS=IS»^+i!-J 

4 AS  PlANE(u1=PLANF(4)*(IS-8)yTURvS 
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36 7 no  207  1=1,4 

366  CALL  P"PSteU4-T,J) 

3*9  907  IS=IS*?+?-J 

391!  PLANrcS)=PLAr'F(5)^(lS-6)*TURnSi 

39i  r process  pl amp  i_  dopings 

39?  Tf»ARS<PLANf  (»,)). LT.l.S7(179)eO  TO  209 

3*»3  PlANF(4)=PLANF  (4>f3. 14150 

394  TuPMSls-  rtjPf  Si 

395  TFtPLrt  iF(M.LT.fi>rrf)  7y  ?0t 

39b  PLANF  • *>  J =?>•  141  r926-PL  AMF(  t>Y 

397  r,j  JO  209 

396  200  PLANt(s)=-3.14lS9?ft-PLAMF(b> 

3 99  ?c 9 CuMTINi.'F 

400  r move  the  pl/mf  iflame  is  movfd  ry  moving  everything  tLse 

901  C Till  THE  OPPOSITF  DIRECTION) 

4(12  POCKF.T<t)=KtCKrTIl)-PLAA'FX  ~ 

403  PoCKET(2)=R0CwpT<?)-PL6NEY 

404  XBsXB+'-'l.ANEV 

405  Y(t=Y9  + ''LA!  EY  ” 

906  00  210  1 = 1 « f iCHAFF 

407  CHAFF n ,1 I=CHAFF(1,I)-PLANEX 

400  910  CHAFF(?,I )=CHAFF(2,I  ) -PLANE Y . 

909  C ()SP=C  OS  < ROCKET < 5 > ) 

410  c MOVE  Tie  M.ISSIl F IN  ITS  STRAIGHT  LINE  PaTH 

411  C INCREASE  SPEED  VS  TIRE 

412  PoCKV  = f<OCt<Vi>4-IT*yROCKI 

9*a  POCKET  ( 1 IsH.OCKPTI  1 > 4K0CKV*C0S  C ROCKET  ( 4 ) )*COSp 

414  ROCKET (SJsPnCKFt I ?>+K0CKV*SlM(H0tKETC4 ) 1*C0SP 

4is  Pocket (3)=r<ocKFTt3)+t<nCKv*siN(«ocKET(i>>  i 

416  r CHOP  A CHAFF  Cl  OUn  IF  switch  17  IS  HP  AM)  WAR  DOWN  BEFORE 

417  C (ICHAFF  1NUJCATC-S  PREVIOUS  STATF  OF  CHAFF  SWITCH) 

41«  , CALL  PMPSW(17,Tl 

419  60  TO  ( 220 ,230 ) « I 

420  92  0 TF«  ICHAFF)  GO  TO  24(1 

421-  MCHAFF  = iNCHAFF*1 

9??  no  22b  1 = 1,3 

923  CHAFF ( T *F CHAFF ) aP LAME ( I ) ' 

424  ?25  CONTINUE 

4 ?5  I CHAFF  = .TRUE , 

926  CO  TO  ?90  

.927  930  tchaffx. false, 

926  940  CONTINUE 

429  f CHECK  IF  MISSILE  HAS  LOST  TRACK 

43(1  25(1  CONTINUE 

431  C ThTS  is  tHt  SrnTION  TO  DEcIPF  WHAT  TO  DO  WHEN  THE  PROGRAM 

432  r HflS  helm  TERMINATED 

433  1000  11=11-1 

434  WK I TE ( A , 1 010  ) T T 

43b  1010  F'oRhAT ( 14/ ’CONTINUE , COPE ( EX  IT » CONT ’RESTART ) * ) 

436  PEAD(6*-JI 

937  . TF  <1)1 020 ,100,= 

93«  io?o  call  exit  ' : 

939  Fwo 
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